home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / Files / MacII / H-L / JuliaSet 5.1b0.cpt / JuliaSet.a next >
MacBinary  |  1988-04-08  |  21.4 KB  |  [TEXT/MPS ]
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: JuliaSet.a

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert System V 64-bit library (executable/systemV64BitLibrary) ext Unsupported
1% dexvert COFF Library (other/coffLibrary) ext Unsupported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Fri Apr 8 19:57:18 1988, modified Fri Apr 8 19:57:18 1988, creator 'MPS ', type ASCII, 21337 bytes "JuliaSet.a" , at 0x53d9 382 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[MPS ]


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 4a 75 6c 69 61 53 | 65 74 2e 61 00 00 00 00 |..JuliaS|et.a....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 53 59 00 | 00 01 7e 9e 83 19 5e 9e |.....SY.|..~...^.|
|00000060| 83 19 5e 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..^.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 12 7c 00 00 |........|.....|..|
|00000080| 3b 0d 3b 09 66 72 61 63 | 74 61 6c 20 78 63 6d 64 |;.;.frac|tal xcmd|
|00000090| 20 76 30 2e 33 20 2d 2d | 20 44 6f 75 67 20 46 65 | v0.3 --| Doug Fe|
|000000a0| 6c 74 2c 20 4f 63 74 20 | 31 34 2c 20 31 39 38 37 |lt, Oct |14, 1987|
|000000b0| 0d 3b 09 0d 3b 09 54 68 | 69 73 20 64 72 61 77 73 |.;..;.Th|is draws|
|000000c0| 20 61 20 66 72 61 63 74 | 61 6c 20 6f 6e 20 74 68 | a fract|al on th|
|000000d0| 65 20 73 63 72 65 65 6e | 2e 20 20 4e 6f 74 20 74 |e screen|.  Not t|
|000000e0| 6f 20 74 68 65 20 63 61 | 72 64 2c 20 79 65 74 2e |o the ca|rd, yet.|
|000000f0| 20 20 46 75 6e 63 74 69 | 6f 6e 20 69 73 0d 3b 09 |  Functi|on is.;.|
|00000100| 66 28 7a 29 20 3d 20 7a | 20 2a 20 7a 20 2b 20 63 |f(z) = z| * z + c|
|00000110| 2c 20 6a 75 6c 69 61 20 | 73 65 74 20 6d 61 70 70 |, julia |set mapp|
|00000120| 65 64 20 74 6f 20 34 20 | 70 61 74 74 65 72 6e 73 |ed to 4 |patterns|
|00000130| 2e 0d 3b 09 0d 3b 09 46 | 6f 72 6d 61 74 3a 0d 3b |..;..;.F|ormat:.;|
|00000140| 09 09 20 46 72 61 63 74 | 61 6c 20 73 65 65 64 2e |.. Fract|al seed.|
|00000150| 68 20 73 65 65 64 2e 76 | 20 5b 72 65 73 20 3d 20 |h seed.v| [res = |
|00000160| 38 20 5b 6c 69 6d 69 74 | 20 3d 20 33 32 20 5b 6c |8 [limit| = 32 [l|
|00000170| 6f 63 6b 20 3d 20 30 5d | 5d 5d 0d 3b 09 09 20 0d |ock = 0]|]].;.. .|
|00000180| 3b 09 73 65 65 64 20 69 | 73 20 74 68 65 20 63 6f |;.seed i|s the co|
|00000190| 6d 70 6c 65 78 20 63 6f | 6e 73 74 61 6e 74 20 63 |mplex co|nstant c|
|000001a0| 20 28 76 20 69 6d 61 67 | 69 6e 61 72 79 29 0d 3b | (v imag|inary).;|
|000001b0| 09 72 65 73 20 69 73 20 | 74 68 65 20 6e 75 6d 62 |.res is |the numb|
|000001c0| 65 72 20 6f 66 20 70 69 | 78 65 6c 73 20 6f 6e 20 |er of pi|xels on |
|000001d0| 61 20 73 69 64 65 20 66 | 6f 72 20 74 68 65 20 70 |a side f|or the p|
|000001e0| 6f 69 6e 74 20 74 6f 20 | 70 6c 6f 74 20 0d 3b 09 |oint to |plot .;.|
|000001f0| 6c 69 6d 69 74 20 69 73 | 20 74 68 65 20 6d 61 78 |limit is| the max|
|00000200| 20 6e 75 6d 62 65 72 20 | 6f 66 20 69 74 65 72 61 | number |of itera|
|00000210| 74 69 6f 6e 73 20 28 62 | 65 73 74 20 62 65 74 77 |tions (b|est betw|
|00000220| 65 65 6e 20 31 36 20 26 | 20 31 32 38 2c 20 6d 75 |een 16 &| 128, mu|
|00000230| 6c 74 69 70 6c 65 20 6f | 66 20 34 29 2c 0d 3b 09 |ltiple o|f 4),.;.|
|00000240| 6c 6f 77 65 72 20 6c 69 | 6d 69 74 20 6d 65 61 6e |lower li|mit mean|
|00000250| 73 20 6d 6f 73 74 20 63 | 6f 6d 70 6c 65 78 20 72 |s most c|omplex r|
|00000260| 65 67 69 6f 6e 73 20 6f | 66 20 74 68 65 20 66 72 |egions o|f the fr|
|00000270| 61 63 74 61 6c 20 61 72 | 65 20 77 68 69 74 65 0d |actal ar|e white.|
|00000280| 3b 09 69 66 20 6c 6f 63 | 6b 20 69 73 20 30 2c 20 |;.if loc|k is 0, |
|00000290| 70 72 65 73 73 69 6e 67 | 20 74 68 65 20 6d 6f 75 |pressing| the mou|
|000002a0| 73 65 20 77 69 6c 6c 20 | 69 6d 6d 65 64 69 61 74 |se will |immediat|
|000002b0| 65 6c 79 20 73 74 6f 70 | 20 74 68 65 20 64 72 61 |ely stop| the dra|
|000002c0| 77 69 6e 67 2c 20 6f 74 | 68 65 72 77 69 73 65 0d |wing, ot|herwise.|
|000002d0| 3b 09 70 72 65 73 73 69 | 6e 67 20 74 68 65 20 6d |;.pressi|ng the m|
|000002e0| 6f 75 73 65 20 68 61 73 | 20 6e 6f 20 65 66 66 65 |ouse has| no effe|
|000002f0| 63 74 20 61 6e 64 20 64 | 72 61 77 69 6e 67 20 63 |ct and d|rawing c|
|00000300| 61 6e 20 6f 6e 6c 79 20 | 62 65 20 73 74 6f 70 70 |an only |be stopp|
|00000310| 65 64 20 62 79 20 72 65 | 62 6f 6f 74 20 6f 72 0d |ed by re|boot or.|
|00000320| 3b 09 66 61 6e 63 79 20 | 6d 61 63 73 62 75 67 20 |;.fancy |macsbug |
|00000330| 77 6f 72 6b 2e 0d 3b 20 | 20 20 0d 3b 09 44 6f 75 |work..; |  .;.Dou|
|00000340| 67 20 46 65 6c 74 2c 20 | 41 49 52 2f 43 41 54 20 |g Felt, |AIR/CAT |
|00000350| 50 72 6f 6a 65 63 74 0d | 3b 09 64 75 67 67 69 65 |Project.|;.duggie|
|00000360| 40 6a 65 73 73 69 63 61 | 2e 73 74 61 6e 66 6f 72 |@jessica|.stanfor|
|00000370| 64 2e 65 64 75 0d 3b 0d | 3b 09 0d 3b 09 54 6f 20 |d.edu.;.|;..;.To |
|00000380| 63 6f 6d 70 69 6c 65 20 | 61 6e 64 20 6c 69 6e 6b |compile |and link|
|00000390| 20 69 6e 20 4d 50 57 20 | 43 3a 0d 3b 0d 3b 09 43 | in MPW |C:.;.;.C|
|000003a0| 20 2d 71 32 20 46 72 61 | 63 74 61 6c 2e 63 0d 3b | -q2 Fra|ctal.c.;|
|000003b0| 09 6c 69 6e 6b 20 2d 73 | 6e 20 4d 61 69 6e 3d 46 |.link -s|n Main=F|
|000003c0| 72 61 63 74 61 6c 20 2d | 73 6e 20 53 54 44 49 4f |ractal -|sn STDIO|
|000003d0| 3d 46 72 61 63 74 61 6c | 20 b6 0d 3b 09 09 20 2d |=Fractal| ..;.. -|
|000003e0| 73 6e 20 49 4e 54 45 4e | 56 3d 46 72 61 63 74 61 |sn INTEN|V=Fracta|
|000003f0| 6c 20 2d 72 74 20 58 43 | 4d 44 3d 31 30 34 20 b6 |l -rt XC|MD=104 .|
|00000400| 0d 3b 09 09 20 2d 6d 20 | 46 52 41 43 54 41 4c 20 |.;.. -m |FRACTAL |
|00000410| 46 72 61 63 74 61 6c 2e | 63 2e 6f 20 22 7b 43 4c |Fractal.|c.o "{CL|
|00000420| 69 62 72 61 72 69 65 73 | 7d 43 52 75 6e 54 69 6d |ibraries|}CRunTim|
|00000430| 65 2e 6f 22 20 b6 0d 3b | 09 09 20 2d 6f 20 48 79 |e.o" ..;|.. -o Hy|
|00000440| 70 65 72 43 6f 6d 6d 61 | 6e 64 73 0d 3b 0d 3b 0d |perComma|nds.;.;.|
|00000450| 3b 0d 3b 09 46 72 61 63 | 74 61 6c 33 20 78 63 6d |;.;.Frac|tal3 xcm|
|00000460| 64 20 76 33 2e 30 20 2d | 2d 20 52 61 79 20 53 61 |d v3.0 -|- Ray Sa|
|00000470| 6e 64 65 72 73 2c 20 4e | 6f 76 20 37 2c 20 31 39 |nders, N|ov 7, 19|
|00000480| 38 37 0d 3b 0d 3b 09 09 | 57 65 6c 6c 20 6e 6f 77 |87.;.;..|Well now|
|00000490| 2c 20 49 20 74 68 6f 75 | 67 68 74 20 74 68 69 73 |, I thou|ght this|
|000004a0| 20 77 61 73 20 73 6f 20 | 6e 65 61 74 2c 20 61 6e | was so |neat, an|
|000004b0| 64 20 44 6f 75 67 20 77 | 61 73 20 72 69 67 68 74 |d Doug w|as right|
|000004c0| 20 69 74 20 6e 65 65 64 | 73 20 61 20 0d 3b 09 6c | it need|s a .;.l|
|000004d0| 69 74 74 6c 65 20 6d 6f | 72 65 20 73 70 65 65 64 |ittle mo|re speed|
|000004e0| 2e 20 53 6f 20 74 68 61 | 74 73 20 77 68 61 74 20 |. So tha|ts what |
|000004f0| 49 20 64 69 64 2c 20 49 | 20 72 65 77 72 6f 74 65 |I did, I| rewrote|
|00000500| 20 74 68 65 20 22 43 22 | 20 70 72 6f 67 72 61 6d | the "C"| program|
|00000510| 20 69 6e 20 0d 3b 09 61 | 73 73 65 6d 62 6c 65 72 | in .;.a|ssembler|
|00000520| 20 77 69 74 68 20 64 69 | 72 65 63 74 20 70 72 6f | with di|rect pro|
|00000530| 63 65 73 73 69 6e 67 20 | 6f 6e 20 74 68 65 20 4d |cessing |on the M|
|00000540| 43 36 38 38 38 31 20 46 | 50 55 2e 20 49 20 74 68 |C68881 F|PU. I th|
|00000550| 69 6e 6b 20 74 68 69 73 | 20 6d 61 6b 65 73 0d 3b |ink this| makes.;|
|00000560| 09 71 75 69 74 65 20 61 | 20 64 69 66 66 65 72 65 |.quite a| differe|
|00000570| 6e 63 65 2e 20 54 68 65 | 20 6f 6e 6c 79 20 74 68 |nce. The| only th|
|00000580| 69 6e 67 20 69 73 20 74 | 68 61 74 20 69 74 20 6f |ing is t|hat it o|
|00000590| 6e 6c 79 20 72 75 6e 73 | 20 6f 6e 20 61 20 4d 61 |nly runs| on a Ma|
|000005a0| 63 49 49 2e 20 49 74 0d | 3b 09 6d 69 67 68 74 20 |cII. It.|;.might |
|000005b0| 72 75 6e 20 6f 6e 20 6f | 6e 65 20 6f 72 20 6d 6f |run on o|ne or mo|
|000005c0| 72 65 20 6f 66 20 74 68 | 65 20 61 63 63 65 6c 65 |re of th|e accele|
|000005d0| 72 61 74 6f 72 20 63 61 | 72 64 73 2e 20 47 69 76 |rator ca|rds. Giv|
|000005e0| 65 20 69 74 20 61 20 74 | 72 79 2e 20 49 66 20 0d |e it a t|ry. If .|
|000005f0| 3b 09 6e 65 63 65 73 73 | 61 72 79 2c 20 63 68 61 |;.necess|ary, cha|
|00000600| 6e 67 65 20 74 68 65 20 | 43 4f 49 44 3d 20 70 61 |nge the |COID= pa|
|00000610| 72 61 6d 65 74 65 72 20 | 62 65 6c 6f 77 20 69 66 |rameter |below if|
|00000620| 20 74 68 65 79 20 61 72 | 65 20 75 73 69 6e 67 20 | they ar|e using |
|00000630| 6f 74 68 65 72 20 74 68 | 61 6e 20 31 2e 0d 3b 0d |other th|an 1..;.|
|00000640| 3b 09 09 09 09 09 52 61 | 79 20 53 61 6e 64 65 72 |;.....Ra|y Sander|
|00000650| 73 0d 3b 09 09 09 09 47 | 72 65 65 6e 20 47 72 61 |s.;....G|reen Gra|
|00000660| 73 73 20 53 6f 66 74 77 | 61 72 65 2c 20 49 6e 63 |ss Softw|are, Inc|
|00000670| 2e 0d 3b 0d 3b 09 09 09 | 43 49 53 3a 20 37 30 32 |..;.;...|CIS: 702|
|00000680| 37 37 2c 33 32 33 33 20 | 20 20 20 20 47 45 6e 69 |77,3233 |    GEni|
|00000690| 65 3a 20 52 41 59 53 41 | 4e 44 45 52 53 0d 3b 0d |e: RAYSA|NDERS.;.|
|000006a0| 3b 09 54 6f 20 61 73 73 | 65 6d 62 6c 65 20 61 6e |;.To ass|emble an|
|000006b0| 64 20 6c 69 6e 6b 20 77 | 69 74 68 20 4d 50 57 3a |d link w|ith MPW:|
|000006c0| 0d 3b 0d 3b 09 09 09 09 | 66 72 61 63 74 61 6c 33 |.;.;....|fractal3|
|000006d0| 2e 61 2e 6f 20 c4 20 66 | 72 61 63 74 61 6c 33 2e |.a.o . f|ractal3.|
|000006e0| 6d 61 6b 65 20 66 72 61 | 63 74 61 6c 33 2e 61 0d |make fra|ctal3.a.|
|000006f0| 3b 09 09 09 09 09 41 73 | 6d 20 66 72 61 63 74 61 |;.....As|m fracta|
|00000700| 6c 33 2e 61 20 2d 6c 20 | 2d 66 6f 6e 74 20 4d 6f |l3.a -l |-font Mo|
|00000710| 6e 61 63 6f 2c 39 0d 3b | 09 09 09 09 66 72 61 63 |naco,9.;|....frac|
|00000720| 74 61 6c 33 20 c4 20 66 | 72 61 63 74 61 6c 33 2e |tal3 . f|ractal3.|
|00000730| 6d 61 6b 65 20 66 72 61 | 63 74 61 6c 33 2e 61 2e |make fra|ctal3.a.|
|00000740| 6f 0d 3b 09 09 09 09 09 | 6c 69 6e 6b 20 2d 6f 20 |o.;.....|link -o |
|00000750| 66 72 61 63 74 61 6c 33 | 20 2d 72 74 20 58 43 4d |fractal3| -rt XCM|
|00000760| 44 3d 31 30 36 20 2d 73 | 6e 20 4d 61 69 6e 3d 46 |D=106 -s|n Main=F|
|00000770| 72 61 63 74 61 6c 33 20 | 2d 74 20 53 54 41 4b 20 |ractal3 |-t STAK |
|00000780| 2d 63 20 57 49 4c 44 20 | b6 0d 3b 09 09 09 09 09 |-c WILD |..;.....|
|00000790| 09 66 72 61 63 74 61 6c | 33 2e 61 2e 6f 20 b6 0d |.fractal|3.a.o ..|
|000007a0| 3b 09 09 09 09 09 09 2d | 6f 20 22 46 72 61 63 74 |;......-|o "Fract|
|000007b0| 61 6c 73 22 0d 3b 0d 3b | 0d 3b 0d 3b 09 46 72 61 |als".;.;|.;.;.Fra|
|000007c0| 63 74 61 6c 35 20 2d 2d | 20 52 61 79 20 53 61 6e |ctal5 --| Ray San|
|000007d0| 64 65 72 73 2c 20 4e 6f | 76 20 31 35 2c 20 31 39 |ders, No|v 15, 19|
|000007e0| 38 37 0d 3b 0d 3b 09 09 | 4f 4b 2c 20 73 6f 20 48 |87.;.;..|OK, so H|
|000007f0| 79 70 65 72 43 61 72 64 | 20 77 61 73 20 61 20 74 |yperCard| was a t|
|00000800| 72 69 70 2e 20 42 75 74 | 20 77 68 65 6e 20 79 6f |rip. But| when yo|
|00000810| 75 20 68 61 76 65 20 74 | 6f 20 72 75 6e 20 69 74 |u have t|o run it|
|00000820| 20 6f 6e 20 74 68 65 20 | 4d 61 63 20 49 49 0d 3b | on the |Mac II.;|
|00000830| 09 79 6f 75 20 6d 69 67 | 68 74 20 61 73 20 77 65 |.you mig|ht as we|
|00000840| 6c 6c 20 68 61 76 65 20 | 74 68 65 20 63 6f 6c 6f |ll have |the colo|
|00000850| 72 2e 20 41 6e 64 20 77 | 65 20 64 6f 2e 0d 3b 0d |r. And w|e do..;.|
|00000860| 3b 09 09 09 09 09 52 61 | 79 20 53 61 6e 64 65 72 |;.....Ra|y Sander|
|00000870| 73 0d 3b 09 09 09 09 47 | 72 65 65 6e 20 47 72 61 |s.;....G|reen Gra|
|00000880| 73 73 20 53 6f 66 74 77 | 61 72 65 2c 20 49 6e 63 |ss Softw|are, Inc|
|00000890| 2e 0d 3b 0d 3b 09 09 09 | 43 49 53 3a 20 37 30 32 |..;.;...|CIS: 702|
|000008a0| 37 37 2c 33 32 33 33 20 | 20 20 20 20 47 45 6e 69 |77,3233 |    GEni|
|000008b0| 65 3a 20 52 41 59 53 41 | 4e 44 45 52 53 0d 3b 0d |e: RAYSA|NDERS.;.|
|000008c0| 3b 09 54 6f 20 61 73 73 | 65 6d 62 6c 65 20 61 6e |;.To ass|emble an|
|000008d0| 64 20 6c 69 6e 6b 20 77 | 69 74 68 20 4d 50 57 3a |d link w|ith MPW:|
|000008e0| 0d 3b 0d 3b 09 09 23 20 | 20 20 54 61 72 67 65 74 |.;.;..# |  Target|
|000008f0| 3a 20 20 20 20 20 66 72 | 61 63 74 61 6c 35 0d 3b |:     fr|actal5.;|
|00000900| 09 09 23 20 20 20 53 6f | 75 72 63 65 73 3a 20 20 |..#   So|urces:  |
|00000910| 20 20 66 72 61 63 74 61 | 6c 35 2e 61 20 66 72 61 |  fracta|l5.a fra|
|00000920| 63 74 61 6c 35 2e 72 0d | 3b 09 09 23 20 20 20 43 |ctal5.r.|;..#   C|
|00000930| 72 65 61 74 65 64 3a 20 | 20 20 20 53 61 74 75 72 |reated: |   Satur|
|00000940| 64 61 79 2c 20 4e 6f 76 | 65 6d 62 65 72 20 31 34 |day, Nov|ember 14|
|00000950| 2c 20 31 39 38 37 20 31 | 31 3a 32 36 3a 35 33 20 |, 1987 1|1:26:53 |
|00000960| 50 4d 0d 3b 09 09 0d 3b | 09 09 66 72 61 63 74 61 |PM.;...;|..fracta|
|00000970| 6c 35 2e 61 2e 6f 20 c4 | 20 66 72 61 63 74 61 6c |l5.a.o .| fractal|
|00000980| 35 2e 6d 61 6b 65 20 66 | 72 61 63 74 61 6c 35 2e |5.make f|ractal5.|
|00000990| 61 0d 3b 09 09 09 41 73 | 6d 20 66 72 61 63 74 61 |a.;...As|m fracta|
|000009a0| 6c 35 2e 61 20 2d 66 6f | 6e 74 20 4d 6f 6e 61 63 |l5.a -fo|nt Monac|
|000009b0| 6f 2c 39 0d 3b 09 09 66 | 72 61 63 74 61 6c 35 20 |o,9.;..f|ractal5 |
|000009c0| c4 c4 20 66 72 61 63 74 | 61 6c 35 2e 6d 61 6b 65 |.. fract|al5.make|
|000009d0| 20 66 72 61 63 74 61 6c | 35 2e 72 0d 3b 09 09 09 | fractal|5.r.;...|
|000009e0| 52 65 7a 20 66 72 61 63 | 74 61 6c 35 2e 72 20 2d |Rez frac|tal5.r -|
|000009f0| 61 70 70 65 6e 64 20 2d | 6f 20 66 72 61 63 74 61 |append -|o fracta|
|00000a00| 6c 35 0d 3b 09 09 66 72 | 61 63 74 61 6c 35 20 c4 |l5.;..fr|actal5 .|
|00000a10| c4 20 66 72 61 63 74 61 | 6c 35 2e 6d 61 6b 65 20 |. fracta|l5.make |
|00000a20| 66 72 61 63 74 61 6c 35 | 2e 61 2e 6f 0d 3b 09 09 |fractal5|.a.o.;..|
|00000a30| 09 4c 69 6e 6b 20 2d 77 | 20 2d 74 20 41 50 50 4c |.Link -w| -t APPL|
|00000a40| 20 2d 63 20 27 3f 3f 3f | 3f 27 20 b6 0d 3b 09 09 | -c '???|?' ..;..|
|00000a50| 09 09 66 72 61 63 74 61 | 6c 35 2e 61 2e 6f 20 b6 |..fracta|l5.a.o .|
|00000a60| 0d 3b 09 09 09 09 22 7b | 4c 69 62 72 61 72 69 65 |.;...."{|Librarie|
|00000a70| 73 7d 22 49 6e 74 65 72 | 66 61 63 65 2e 6f 20 b6 |s}"Inter|face.o .|
|00000a80| 0d 3b 09 09 09 09 22 7b | 4c 69 62 72 61 72 69 65 |.;...."{|Librarie|
|00000a90| 73 7d 22 52 75 6e 74 69 | 6d 65 2e 6f 20 b6 0d 3b |s}"Runti|me.o ..;|
|00000aa0| 09 09 09 09 2d 6f 20 66 | 72 61 63 74 61 6c 35 0d |....-o f|ractal5.|
|00000ab0| 3b 0d 3b 0d 0d 0d 3b 20 | 09 09 49 4e 43 4c 55 44 |;.;...; |..INCLUD|
|00000ac0| 45 09 09 27 54 72 61 70 | 73 2e 61 27 0d 3b 20 09 |E..'Trap|s.a'.; .|
|00000ad0| 09 49 4e 43 4c 55 44 45 | 09 09 27 53 79 73 45 71 |.INCLUDE|..'SysEq|
|00000ae0| 75 2e 61 27 0d 3b 20 09 | 09 49 4e 43 4c 55 44 45 |u.a'.; .|.INCLUDE|
|00000af0| 09 09 27 51 75 69 63 6b | 45 71 75 2e 61 27 0d 3b |..'Quick|Equ.a'.;|
|00000b00| 20 09 09 49 4e 43 4c 55 | 44 45 09 09 27 54 6f 6f | ..INCLU|DE..'Too|
|00000b10| 6c 45 71 75 2e 61 27 0d | 3b 20 09 09 49 4e 43 4c |lEqu.a'.|; ..INCL|
|00000b20| 55 44 45 09 09 27 50 61 | 6c 65 74 74 65 45 71 75 |UDE..'Pa|letteEqu|
|00000b30| 2e 61 27 0d 09 09 50 52 | 49 4e 54 09 09 4f 46 46 |.a'...PR|INT..OFF|
|00000b40| 0d 20 09 09 49 4e 43 4c | 55 44 45 09 09 27 54 72 |. ..INCL|UDE..'Tr|
|00000b50| 61 70 73 2e 61 27 0d 20 | 09 09 49 4e 43 4c 55 44 |aps.a'. |..INCLUD|
|00000b60| 45 09 09 27 53 79 73 45 | 71 75 2e 61 27 0d 20 09 |E..'SysE|qu.a'. .|
|00000b70| 09 49 4e 43 4c 55 44 45 | 09 09 27 51 75 69 63 6b |.INCLUDE|..'Quick|
|00000b80| 45 71 75 2e 61 27 0d 20 | 09 09 49 4e 43 4c 55 44 |Equ.a'. |..INCLUD|
|00000b90| 45 09 09 27 54 6f 6f 6c | 45 71 75 2e 61 27 0d 20 |E..'Tool|Equ.a'. |
|00000ba0| 09 09 49 4e 43 4c 55 44 | 45 09 09 27 50 61 6c 65 |..INCLUD|E..'Pale|
|00000bb0| 74 74 65 45 71 75 2e 61 | 27 0d 09 09 50 52 49 4e |tteEqu.a|'...PRIN|
|00000bc0| 54 09 09 4f 4e 2c 4e 4f | 57 41 52 4e 0d 3b 09 09 |T..ON,NO|WARN.;..|
|00000bd0| 50 52 49 4e 54 09 09 4f | 4e 0d 0d 09 09 09 09 42 |PRINT..O|N......B|
|00000be0| 4c 41 4e 4b 53 09 09 09 | 4f 46 46 20 09 3b 20 61 |LANKS...|OFF .; a|
|00000bf0| 6c 6c 6f 77 20 63 6f 6d | 6d 65 6e 74 73 20 77 69 |llow com|ments wi|
|00000c00| 74 68 6f 75 74 20 73 65 | 6d 69 63 6f 6c 6f 6e 73 |thout se|micolons|
|00000c10| 0d 0d 50 6f 69 6e 74 09 | 09 09 52 45 43 4f 52 44 |..Point.|..RECORD|
|00000c20| 09 09 09 30 09 09 09 50 | 6f 69 6e 74 20 3d 20 52 |...0...P|oint = R|
|00000c30| 45 43 4f 52 44 20 43 41 | 53 45 20 49 4e 54 45 47 |ECORD CA|SE INTEG|
|00000c40| 45 52 20 4f 46 0d 76 09 | 09 09 09 44 53 2e 57 09 |ER OF.v.|...DS.W.|
|00000c50| 09 09 31 09 09 09 09 09 | 20 20 31 3a 20 28 76 3a |..1.....|  1: (v:|
|00000c60| 20 49 4e 54 45 47 45 52 | 3b 0d 68 09 09 09 09 44 | INTEGER|;.h....D|
|00000c70| 53 2e 57 09 09 09 31 09 | 09 09 09 09 09 20 20 68 |S.W...1.|.....  h|
|00000c80| 3a 20 49 4e 54 45 47 45 | 52 29 3b 0d 09 09 09 09 |: INTEGE|R);.....|
|00000c90| 4f 52 47 20 09 09 09 76 | 09 09 09 09 09 20 20 32 |ORG ...v|.....  2|
|00000ca0| 3a 20 28 76 68 3a 20 41 | 52 52 41 59 5b 31 2e 2e |: (vh: A|RRAY[1..|
|00000cb0| 32 5d 0d 76 68 09 09 09 | 09 44 53 2e 57 09 09 09 |2].vh...|.DS.W...|
|00000cc0| 68 09 09 09 09 09 09 09 | 09 20 4f 46 20 49 4e 54 |h.......|. OF INT|
|00000cd0| 45 47 45 52 29 0d 09 09 | 09 09 45 4e 44 52 09 09 |EGER)...|..ENDR..|
|00000ce0| 09 09 09 09 09 09 45 4e | 44 3b 0d 0d 52 65 63 74 |......EN|D;..Rect|
|00000cf0| 09 09 09 52 45 43 4f 52 | 44 09 09 09 30 09 09 09 |...RECOR|D...0...|
|00000d00| 52 65 63 74 20 20 3d 20 | 52 45 43 4f 52 44 20 43 |Rect  = |RECORD C|
|00000d10| 41 53 45 20 49 4e 54 45 | 47 45 52 20 4f 46 0d 74 |ASE INTE|GER OF.t|
|00000d20| 6f 70 20 09 09 09 44 53 | 2e 57 09 09 09 31 09 09 |op ...DS|.W...1..|
|00000d30| 09 09 09 20 20 31 3a 20 | 28 74 6f 70 3a 09 20 20 |...  1: |(top:.  |
|00000d40| 49 4e 54 45 47 45 52 3b | 0d 6c 65 66 74 09 09 09 |INTEGER;|.left...|
|00000d50| 44 53 2e 57 09 09 09 31 | 09 09 09 09 09 09 20 20 |DS.W...1|......  |
|00000d60| 6c 65 66 74 3a 20 20 20 | 49 4e 54 45 47 45 52 3b |left:   |INTEGER;|
|00000d70| 0d 62 6f 74 74 6f 6d 09 | 09 09 44 53 2e 57 09 09 |.bottom.|..DS.W..|
|00000d80| 09 31 09 09 09 09 09 09 | 20 20 62 6f 74 74 6f 6d |.1......|  bottom|
|00000d90| 3a 20 49 4e 54 45 47 45 | 52 3b 0d 72 69 67 68 74 |: INTEGE|R;.right|
|00000da0| 09 09 09 44 53 2e 57 09 | 09 09 31 09 09 09 09 09 |...DS.W.|..1.....|
|00000db0| 09 20 20 72 69 67 68 74 | 3a 20 20 49 4e 54 45 47 |.  right|:  INTEG|
|00000dc0| 45 52 29 3b 0d 09 09 09 | 09 4f 52 47 20 09 09 09 |ER);....|.ORG ...|
|00000dd0| 74 6f 70 0d 74 6f 70 4c | 65 66 74 20 09 09 44 53 |top.topL|eft ..DS|
|00000de0| 2e 4c 09 09 09 50 6f 69 | 6e 74 09 09 09 09 20 20 |.L...Poi|nt....  |
|00000df0| 32 3a 20 20 28 74 6f 70 | 4c 65 66 74 3a 20 20 50 |2:  (top|Left:  P|
|00000e00| 6f 69 6e 74 3b 0d 62 6f | 74 52 69 67 68 74 09 09 |oint;.bo|tRight..|
|00000e10| 44 53 2e 4c 09 09 09 50 | 6f 69 6e 74 09 09 09 09 |DS.L...P|oint....|
|00000e20| 20 20 33 3a 20 20 28 62 | 6f 74 52 69 67 68 74 3a |  3:  (b|otRight:|
|00000e30| 20 50 6f 69 6e 74 29 0d | 09 09 09 09 45 4e 44 52 | Point).|....ENDR|
|00000e40| 09 09 09 09 09 09 09 09 | 45 4e 44 3b 0d 0d 42 69 |........|END;..Bi|
|00000e50| 74 4d 61 70 09 09 09 52 | 45 43 4f 52 44 09 09 09 |tMap...R|ECORD...|
|00000e60| 30 09 09 09 42 69 74 4d | 61 70 20 3d 20 52 45 43 |0...BitM|ap = REC|
|00000e70| 4f 52 44 0d 62 61 73 65 | 41 64 64 72 09 09 44 53 |ORD.base|Addr..DS|
|00000e80| 2e 4c 09 09 09 31 09 09 | 09 09 09 20 20 62 61 73 |.L...1..|...  bas|
|00000e90| 65 41 64 64 72 3a 20 51 | 44 50 74 72 3b 0d 72 6f |eAddr: Q|DPtr;.ro|
|00000ea0| 77 42 79 74 65 73 09 09 | 44 53 2e 57 09 09 09 31 |wBytes..|DS.W...1|
|00000eb0| 09 09 09 09 09 20 20 72 | 6f 77 42 79 74 65 73 3a |.....  r|owBytes:|
|00000ec0| 20 49 4e 54 45 47 45 52 | 3b 0d 62 6f 75 6e 64 73 | INTEGER|;.bounds|
|00000ed0| 09 09 09 44 53 2e 4c 09 | 09 09 52 65 63 74 09 09 |...DS.L.|..Rect..|
|00000ee0| 09 09 20 20 62 6f 75 6e | 64 73 3a 09 20 52 65 63 |..  boun|ds:. Rec|
|00000ef0| 74 0d 09 09 09 09 45 4e | 44 52 09 09 09 09 09 09 |t.....EN|DR......|
|00000f00| 09 09 45 4e 44 3b 0d 0d | 45 76 65 6e 74 52 65 63 |..END;..|EventRec|
|00000f10| 6f 72 64 20 09 52 45 43 | 4f 52 44 09 09 09 30 09 |ord .REC|ORD...0.|
|00000f20| 09 09 45 76 65 6e 74 52 | 65 63 6f 72 64 20 3d 20 |..EventR|ecord = |
|00000f30| 52 45 43 4f 52 44 0d 77 | 68 61 74 09 09 09 44 53 |RECORD.w|hat...DS|
|00000f40| 2e 57 09 09 09 31 09 09 | 09 09 09 20 20 77 68 61 |.W...1..|...  wha|
|00000f50| 74 3a 20 20 20 20 49 4e | 54 45 47 45 52 3b 0d 6d |t:    IN|TEGER;.m|
|00000f60| 65 73 73 61 67 65 20 09 | 09 44 53 2e 4c 09 09 09 |essage .|.DS.L...|
|00000f70| 31 09 09 09 09 09 20 20 | 6d 65 73 73 61 67 65 3a |1.....  |message:|
|00000f80| 09 20 4c 4f 4e 47 49 4e | 54 3b 0d 77 68 65 6e 09 |. LONGIN|T;.when.|
|00000f90| 09 09 44 53 2e 4c 09 09 | 09 31 09 09 09 09 09 20 |..DS.L..|.1..... |
|00000fa0| 20 77 68 65 6e 3a 20 20 | 20 20 4c 4f 4e 47 49 4e | when:  |  LONGIN|
|00000fb0| 54 3b 0d 77 68 65 72 65 | 09 09 09 44 53 2e 4c 09 |T;.where|...DS.L.|
|00000fc0| 09 09 50 6f 69 6e 74 09 | 09 09 09 20 20 77 68 65 |..Point.|...  whe|
|00000fd0| 72 65 3a 09 20 20 20 50 | 6f 69 6e 74 3b 0d 6d 6f |re:.   P|oint;.mo|
|00000fe0| 64 69 66 69 65 72 73 09 | 09 44 53 2e 57 09 09 09 |difiers.|.DS.W...|
|00000ff0| 31 09 09 09 09 09 20 20 | 6d 6f 64 69 66 69 65 72 |1.....  |modifier|
|00001000| 73 3a 20 49 4e 54 45 47 | 45 52 0d 09 09 09 09 45 |s: INTEG|ER.....E|
|00001010| 4e 44 52 09 09 09 09 09 | 09 09 09 45 4e 44 3b 0d |NDR.....|...END;.|
|00001020| 0d 09 09 09 09 45 4a 45 | 43 54 0d 0d 2a 2a 2a 2a |.....EJE|CT..****|
|00001030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001040| 2a 2a 2a 0d 2a 20 51 75 | 69 63 6b 44 72 61 77 27 |***.* Qu|ickDraw'|
|00001050| 73 20 47 6c 6f 62 61 6c | 73 20 2a 0d 2a 2a 2a 2a |s Global|s *.****|
|00001060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001070| 2a 2a 2a 0d 0d 2a 20 54 | 68 65 20 66 6f 6c 6c 6f |***..* T|he follo|
|00001080| 77 69 6e 67 20 64 61 74 | 61 20 6d 6f 64 75 6c 65 |wing dat|a module|
|00001090| 20 69 73 20 75 73 65 64 | 20 74 6f 20 64 65 66 69 | is used| to defi|
|000010a0| 6e 65 20 74 68 65 20 51 | 75 69 63 6b 44 72 61 77 |ne the Q|uickDraw|
|000010b0| 20 67 6c 6f 62 61 6c 20 | 64 61 74 61 20 61 72 65 | global |data are|
|000010c0| 61 2e 0d 2a 09 09 09 09 | 2d 2d 2d 2d 2d 2d 2d 2d |a..*....|--------|
|000010d0| 2d 2d 2d 0d 0d 51 75 69 | 63 6b 44 72 61 77 09 09 |---..Qui|ckDraw..|
|000010e0| 52 45 43 4f 52 44 09 09 | 09 2c 44 45 43 52 45 4d |RECORD..|.,DECREM|
|000010f0| 45 4e 54 0d 74 68 65 50 | 6f 72 74 20 09 09 44 53 |ENT.theP|ort ..DS|
|00001100| 2e 4c 09 09 09 31 0d 77 | 68 69 74 65 09 09 09 44 |.L...1.w|hite...D|
|00001110| 53 2e 42 09 09 09 38 0d | 62 6c 61 63 6b 09 09 09 |S.B...8.|black...|
|00001120| 44 53 2e 42 09 09 09 38 | 0d 67 72 61 79 09 09 09 |DS.B...8|.gray...|
|00001130| 44 53 2e 42 09 09 09 38 | 0d 6c 74 47 72 61 79 09 |DS.B...8|.ltGray.|
|00001140| 09 09 44 53 2e 42 09 09 | 09 38 0d 64 6b 47 72 61 |..DS.B..|.8.dkGra|
|00001150| 79 09 09 09 44 53 2e 42 | 09 09 09 38 0d 61 72 72 |y...DS.B|...8.arr|
|00001160| 6f 77 09 09 09 44 53 2e | 42 09 09 09 63 75 72 73 |ow...DS.|B...curs|
|00001170| 52 65 63 0d 73 63 72 65 | 65 6e 42 69 74 73 09 09 |Rec.scre|enBits..|
|00001180| 44 53 2e 42 09 09 09 42 | 69 74 4d 61 70 0d 72 61 |DS.B...B|itMap.ra|
|00001190| 6e 64 53 65 65 64 09 09 | 44 53 2e 4c 09 09 09 31 |ndSeed..|DS.L...1|
|000011a0| 0d 09 09 09 09 4f 52 47 | 20 09 09 09 2d 67 72 61 |.....ORG| ...-gra|
|000011b0| 66 53 69 7a 65 0d 09 09 | 09 09 45 4e 44 52 0d 0d |fSize...|..ENDR..|
|000011c0| 66 72 61 63 74 61 6c 35 | 09 4d 41 49 4e 0d 09 09 |fractal5|.MAIN...|
|000011d0| 0d 09 09 42 4c 41 4e 4b | 53 09 09 4f 4e 0d 09 09 |...BLANK|S..ON...|
|000011e0| 53 54 52 49 4e 47 09 09 | 41 53 49 53 0d 09 09 4d |STRING..|ASIS...M|
|000011f0| 43 36 38 38 38 31 09 09 | 43 4f 49 44 3d 31 2c 50 |C68881..|COID=1,P|
|00001200| 52 45 43 3d 58 2c 52 4f | 55 4e 44 3d 4e 0d 0d 74 |REC=X,RO|UND=N..t|
|00001210| 72 75 65 09 45 51 55 09 | 09 09 31 0d 0d 3b 20 64 |rue.EQU.|..1..; d|
|00001220| 65 66 69 6e 69 74 69 6f | 6e 20 6f 66 20 73 74 61 |efinitio|n of sta|
|00001230| 63 6b 20 66 72 61 6d 65 | 0d 0d 73 74 61 63 6b 53 |ck frame|..stackS|
|00001240| 74 6f 72 09 52 45 43 4f | 52 44 09 30 2c 44 45 43 |tor.RECO|RD.0,DEC|
|00001250| 52 45 4d 45 4e 54 0d 73 | 74 61 63 6b 53 74 6f 72 |REMENT.s|tackStor|
|00001260| 53 74 61 72 74 09 45 51 | 55 09 09 2a 0d 68 73 69 |Start.EQ|U..*.hsi|
|00001270| 7a 65 09 09 09 44 53 2e | 57 09 31 0d 76 73 69 7a |ze...DS.|W.1.vsiz|
|00001280| 65 09 09 09 44 53 2e 57 | 09 31 0d 69 09 09 09 09 |e...DS.W|.1.i....|
|00001290| 44 53 2e 57 09 31 0d 6a | 09 09 09 09 44 53 2e 57 |DS.W.1.j|....DS.W|
|000012a0| 09 31 0d 69 74 65 72 09 | 09 09 44 53 2e 57 09 31 |.1.iter.|..DS.W.1|
|000012b0| 0d 72 62 61 73 65 68 09 | 09 09 44 53 2e 57 09 31 |.rbaseh.|..DS.W.1|
|000012c0| 0d 72 61 74 09 09 09 09 | 44 53 2e 4c 09 33 0d 76 |.rat....|DS.L.3.v|
|000012d0| 61 6c 68 09 09 09 44 53 | 2e 4c 09 33 0d 76 61 6c |alh...DS|.L.3.val|
|000012e0| 76 09 09 09 44 53 2e 4c | 09 33 0d 74 65 6d 70 09 |v...DS.L|.3.temp.|
|000012f0| 09 09 44 53 2e 4c 09 33 | 0d 62 61 73 65 76 09 09 |..DS.L.3|.basev..|
|00001300| 09 44 53 2e 4c 09 33 0d | 62 61 73 65 68 09 09 09 |.DS.L.3.|baseh...|
|00001310| 44 53 2e 4c 09 33 0d 68 | 73 71 09 09 09 09 44 53 |DS.L.3.h|sq....DS|
|00001320| 2e 4c 09 33 0d 76 73 71 | 09 09 09 09 44 53 2e 4c |.L.3.vsq|....DS.L|
|00001330| 09 33 0d 72 65 61 6c 31 | 30 30 09 09 09 44 53 2e |.3.real1|00...DS.|
|00001340| 4c 09 33 0d 66 61 6b 65 | 32 35 36 09 09 09 44 53 |L.3.fake|256...DS|
|00001350| 2e 4c 09 31 0d 66 61 6b | 65 31 37 31 09 09 09 44 |.L.1.fak|e171...D|
|00001360| 53 2e 4c 09 31 0d 66 61 | 6b 65 32 09 09 09 44 53 |S.L.1.fa|ke2...DS|
|00001370| 2e 4c 09 31 0d 66 61 6b | 65 31 30 30 09 09 09 44 |.L.1.fak|e100...D|
|00001380| 53 2e 4c 09 31 0d 72 09 | 09 09 09 44 53 2e 57 09 |S.L.1.r.|...DS.W.|
|00001390| 34 0d 74 65 6d 70 58 09 | 09 09 44 53 2e 4c 09 33 |4.tempX.|..DS.L.3|
|000013a0| 0d 74 65 6d 70 42 69 67 | 09 09 09 44 53 2e 42 09 |.tempBig|...DS.B.|
|000013b0| 35 32 30 0d 74 65 6d 70 | 42 69 67 32 09 09 44 53 |520.temp|Big2..DS|
|000013c0| 2e 42 09 35 32 30 0d 74 | 65 6d 70 4c 09 09 09 44 |.B.520.t|empL...D|
|000013d0| 53 2e 4c 09 31 0d 73 72 | 63 42 4d 09 09 09 44 53 |S.L.1.sr|cBM...DS|
|000013e0| 2e 57 09 37 0d 64 73 74 | 52 09 09 09 44 53 2e 57 |.W.7.dst|R...DS.W|
|000013f0| 09 34 0d 43 75 72 50 6f | 72 74 09 09 09 44 53 2e |.4.CurPo|rt...DS.|
|00001400| 4c 09 31 0d 6f 75 72 57 | 69 6e 64 50 74 72 09 09 |L.1.ourW|indPtr..|
|00001410| 44 53 2e 4c 09 31 0d 6f | 75 72 50 69 78 4d 61 70 |DS.L.1.o|urPixMap|
|00001420| 09 09 44 53 2e 4c 09 31 | 0d 77 61 74 63 68 43 75 |..DS.L.1|.watchCu|
|00001430| 72 73 6f 72 48 61 6e 64 | 09 44 53 2e 4c 09 31 0d |rsorHand|.DS.L.1.|
|00001440| 6f 75 72 44 6c 6f 67 50 | 74 72 09 09 44 53 2e 4c |ourDlogP|tr..DS.L|
|00001450| 09 31 0d 69 74 65 6d 48 | 69 74 49 6e 74 09 09 44 |.1.itemH|itInt..D|
|00001460| 53 2e 57 09 31 0d 64 75 | 6d 6d 79 52 65 63 74 09 |S.W.1.du|mmyRect.|
|00001470| 09 44 53 2e 57 09 34 0d | 69 74 65 6d 48 61 6e 64 |.DS.W.4.|itemHand|
|00001480| 6c 65 09 09 44 53 2e 4c | 09 31 0d 64 75 6d 6d 79 |le..DS.L|.1.dummy|
|00001490| 54 79 70 65 09 09 44 53 | 2e 57 09 31 0d 70 61 63 |Type..DS|.W.1.pac|
|000014a0| 6b 65 64 44 61 74 61 09 | 09 44 53 2e 4c 09 33 0d |kedData.|.DS.L.3.|
|000014b0| 73 65 65 64 48 09 09 09 | 44 53 2e 4c 09 33 0d 73 |seedH...|DS.L.3.s|
|000014c0| 65 65 64 56 09 09 09 44 | 53 2e 4c 09 33 0d 6c 69 |eedV...D|S.L.3.li|
|000014d0| 6d 69 74 09 09 09 44 53 | 2e 57 09 31 0d 65 76 74 |mit...DS|.W.1.evt|
|000014e0| 52 65 63 64 09 09 09 44 | 53 2e 4c 09 34 0d 73 74 |Recd...D|S.L.4.st|
|000014f0| 61 63 6b 53 74 6f 72 4c | 65 6e 09 45 51 55 20 09 |ackStorL|en.EQU .|
|00001500| 2a 2d 73 74 61 63 6b 53 | 74 6f 72 53 74 61 72 74 |*-stackS|torStart|
|00001510| 20 0d 09 09 09 45 4e 44 | 52 0d 0d 09 09 09 57 49 | ....END|R.....WI|
|00001520| 54 48 20 73 74 61 63 6b | 53 74 6f 72 2c 51 75 69 |TH stack|Stor,Qui|
|00001530| 63 6b 44 72 61 77 0d 45 | 6e 74 72 79 50 6f 69 6e |ckDraw.E|ntryPoin|
|00001540| 74 0d 3b 3b 3b 09 09 5f | 44 65 62 75 67 67 65 72 |t.;;;.._|Debugger|
|00001550| 09 09 09 09 09 09 09 3b | 0d 09 09 4d 4f 56 45 4d |.......;|...MOVEM|
|00001560| 2e 4c 09 41 30 2d 41 36 | 2f 44 30 2d 44 37 2c 2d |.L.A0-A6|/D0-D7,-|
|00001570| 28 53 50 29 09 09 09 3b | 0d 09 09 4c 49 4e 4b 09 |(SP)...;|...LINK.|
|00001580| 41 36 2c 23 73 74 61 63 | 6b 53 74 6f 72 4c 65 6e |A6,#stac|kStorLen|
|00001590| 09 09 09 3b 0d 09 0d 09 | 09 50 45 41 20 09 74 68 |...;....|.PEA .th|
|000015a0| 65 50 6f 72 74 20 09 09 | 09 09 09 3b 20 49 6e 69 |ePort ..|...; Ini|
|000015b0| 74 69 61 6c 69 7a 65 20 | 51 75 69 63 6b 44 72 61 |tialize |QuickDra|
|000015c0| 77 0d 09 09 5f 49 6e 69 | 74 47 72 61 66 0d 09 09 |w..._Ini|tGraf...|
|000015d0| 5f 49 6e 69 74 46 6f 6e | 74 73 09 09 09 09 09 09 |_InitFon|ts......|
|000015e0| 09 3b 20 49 6e 69 74 69 | 61 6c 69 7a 65 20 46 6f |.; Initi|alize Fo|
|000015f0| 6e 74 20 4d 61 6e 61 67 | 65 72 0d 09 09 4d 4f 56 |nt Manag|er...MOV|
|00001600| 45 2e 4c 09 23 24 30 30 | 30 30 46 46 46 46 2c 44 |E.L.#$00|00FFFF,D|
|00001610| 30 09 09 09 09 3b 20 44 | 69 73 63 61 72 64 20 61 |0....; D|iscard a|
|00001620| 6e 79 20 70 72 65 76 69 | 6f 75 73 20 65 76 65 6e |ny previ|ous even|
|00001630| 74 73 0d 09 09 5f 46 6c | 75 73 68 45 76 65 6e 74 |ts..._Fl|ushEvent|
|00001640| 73 09 09 09 09 09 09 3b | 20 46 6c 75 73 68 45 76 |s......;| FlushEv|
|00001650| 65 6e 74 73 28 45 76 65 | 6e 74 45 76 65 6e 74 2c |ents(Eve|ntEvent,|
|00001660| 20 30 29 3b 0d 09 09 5f | 49 6e 69 74 57 69 6e 64 | 0);..._|InitWind|
|00001670| 6f 77 73 09 09 09 09 09 | 09 3b 20 49 6e 69 74 69 |ows.....|.; Initi|
|00001680| 61 6c 69 7a 65 20 57 69 | 6e 64 6f 77 20 4d 61 6e |alize Wi|ndow Man|
|00001690| 61 67 65 72 0d 09 09 5f | 49 6e 69 74 4d 65 6e 75 |ager..._|InitMenu|
|000016a0| 73 09 09 09 09 09 09 09 | 3b 20 49 6e 69 74 69 61 |s.......|; Initia|
|000016b0| 6c 69 7a 65 20 4d 65 6e | 75 20 4d 61 6e 61 67 65 |lize Men|u Manage|
|000016c0| 72 0d 09 09 5f 54 45 49 | 6e 69 74 20 09 09 09 09 |r..._TEI|nit ....|
|000016d0| 09 09 09 3b 20 49 6e 69 | 74 69 61 6c 69 7a 65 20 |...; Ini|tialize |
|000016e0| 54 65 78 74 45 64 69 74 | 0d 09 09 43 4c 52 2e 4c |TextEdit|...CLR.L|
|000016f0| 09 2d 28 41 37 29 09 09 | 09 09 09 09 3b 20 49 6e |.-(A7)..|....; In|
|00001700| 69 74 69 61 6c 69 7a 65 | 20 44 69 61 6c 6f 67 20 |itialize| Dialog |
|00001710| 4d 61 6e 61 67 65 72 0d | 09 09 5f 49 6e 69 74 44 |Manager.|.._InitD|
|00001720| 69 61 6c 6f 67 73 09 09 | 09 09 09 09 3b 20 49 6e |ialogs..|....; In|
|00001730| 69 74 44 69 61 6c 6f 67 | 73 28 4e 49 4c 29 3b 0d |itDialog|s(NIL);.|
|00001740| 09 09 5f 49 6e 69 74 43 | 75 72 73 6f 72 20 09 09 |.._InitC|ursor ..|
|00001750| 09 09 09 09 3b 20 4d 61 | 6b 65 20 63 75 72 73 6f |....; Ma|ke curso|
|00001760| 72 20 61 6e 20 61 72 72 | 6f 77 0d 09 09 5f 49 6e |r an arr|ow..._In|
|00001770| 69 74 50 61 6c 65 74 74 | 65 73 09 09 09 09 09 09 |itPalett|es......|
|00001780| 3b 20 63 72 61 6e 6b 20 | 75 70 20 70 61 6c 6c 65 |; crank |up palle|
|00001790| 74 74 65 20 6d 61 6e 61 | 67 65 72 0d 09 09 0d 3b |tte mana|ger....;|
|000017a0| 09 09 09 09 09 09 09 09 | 09 09 09 3b 20 72 65 73 |........|...; res|
|000017b0| 20 3d 20 31 0d 09 09 0d | 3b 09 09 09 09 09 09 09 | = 1....|;.......|
|000017c0| 09 09 09 09 3b 20 6c 69 | 6d 69 74 20 3d 20 36 34 |....; li|mit = 64|
|000017d0| 0d 09 09 0d 3b 09 09 09 | 09 09 09 09 09 09 09 09 |....;...|........|
|000017e0| 3b 20 6e 6f 6c 6f 63 6b | 20 3d 20 31 0d 0d 3b 3b |; nolock| = 1..;;|
|000017f0| 3b 09 09 5f 44 65 62 75 | 67 67 65 72 0d 0d 09 09 |;.._Debu|gger....|
|00001800| 43 4c 52 2e 4c 09 2d 28 | 53 50 29 09 09 09 09 09 |CLR.L.-(|SP).....|
|00001810| 09 3b 20 72 65 73 75 6c | 74 0d 09 09 4d 4f 56 45 |.; resul|t...MOVE|
|00001820| 2e 57 09 23 34 2c 2d 28 | 53 50 29 09 09 09 09 09 |.W.#4,-(|SP).....|
|00001830| 3b 20 63 75 72 73 6f 72 | 20 74 79 70 65 0d 09 09 |; cursor| type...|
|00001840| 5f 47 65 74 43 75 72 73 | 6f 72 09 09 09 09 09 09 |_GetCurs|or......|
|00001850| 09 3b 20 67 65 74 20 68 | 61 6e 64 6c 65 20 74 6f |.; get h|andle to|
|00001860| 20 69 74 0d 09 09 4d 4f | 56 45 2e 4c 09 28 53 50 | it...MO|VE.L.(SP|
|00001870| 29 2b 2c 77 61 74 63 68 | 43 75 72 73 6f 72 48 61 |)+,watch|CursorHa|
|00001880| 6e 64 28 41 36 29 09 3b | 20 61 6e 64 20 73 61 76 |nd(A6).;| and sav|
|00001890| 65 20 69 74 0d 0d 09 09 | 43 4c 52 2e 4c 09 2d 28 |e it....|CLR.L.-(|
|000018a0| 53 50 29 09 09 09 09 09 | 09 3b 20 72 65 73 75 6c |SP).....|.; resul|
|000018b0| 74 0d 09 09 4d 4f 56 45 | 2e 4c 09 23 27 73 63 72 |t...MOVE|.L.#'scr|
|000018c0| 6e 27 2c 2d 28 53 50 29 | 09 09 09 09 3b 20 72 65 |n',-(SP)|....; re|
|000018d0| 73 6f 75 72 63 65 20 74 | 79 70 65 0d 09 09 4d 4f |source t|ype...MO|
|000018e0| 56 45 2e 57 09 23 30 2c | 2d 28 53 50 29 09 09 09 |VE.W.#0,|-(SP)...|
|000018f0| 09 09 3b 20 72 65 73 6f | 75 72 63 65 20 23 0d 09 |..; reso|urce #..|
|00001900| 09 5f 47 65 74 52 65 73 | 6f 75 72 63 65 09 09 09 |._GetRes|ource...|
|00001910| 09 09 09 3b 20 67 65 74 | 20 73 63 72 65 65 6e 20 |...; get| screen |
|00001920| 72 65 73 6f 75 72 63 65 | 0d 09 09 4d 4f 56 45 2e |resource|...MOVE.|
|00001930| 4c 09 28 53 50 29 2b 2c | 41 30 09 09 09 09 09 3b |L.(SP)+,|A0.....;|
|00001940| 20 67 65 74 20 72 65 73 | 6f 75 72 63 65 20 68 61 | get res|ource ha|
|00001950| 6e 64 6c 65 0d 09 09 4d | 4f 56 45 2e 4c 09 28 41 |ndle...M|OVE.L.(A|
|00001960| 30 29 2c 41 30 09 09 09 | 09 09 09 3b 20 64 65 2d |0),A0...|...; de-|
|00001970| 72 65 66 20 69 74 0d 09 | 09 4d 4f 56 45 2e 57 09 |ref it..|.MOVE.W.|
|00001980| 28 41 30 29 2b 2c 44 30 | 09 09 09 09 09 3b 20 63 |(A0)+,D0|.....; c|
|00001990| 6f 75 6e 74 20 6f 66 20 | 73 63 72 65 65 6e 73 0d |ount of |screens.|
|000019a0| 40 30 31 30 0d 09 09 42 | 54 53 54 2e 42 09 23 33 |@010...B|TST.B.#3|
|000019b0| 2c 31 32 28 41 30 29 09 | 09 09 09 09 3b 20 69 73 |,12(A0).|....; is|
|000019c0| 20 74 68 69 73 20 74 68 | 65 20 6d 61 69 6e 20 73 | this th|e main s|
|000019d0| 63 72 65 65 6e 20 3f 0d | 09 09 42 4e 45 2e 53 09 |creen ?.|..BNE.S.|
|000019e0| 40 30 34 30 09 09 09 09 | 09 09 3b 20 79 65 73 0d |@040....|..; yes.|
|000019f0| 09 09 41 44 44 41 2e 4c | 09 23 32 36 2c 41 30 09 |..ADDA.L|.#26,A0.|
|00001a00| 09 09 09 09 09 3b 20 70 | 74 20 74 6f 20 63 74 6c |.....; p|t to ctl|
|00001a10| 20 63 61 6c 6c 20 66 69 | 65 6c 64 0d 09 09 4d 4f | call fi|eld...MO|
|00001a20| 56 45 2e 57 09 28 41 30 | 29 2b 2c 44 31 09 09 09 |VE.W.(A0|)+,D1...|
|00001a30| 09 09 3b 20 67 65 74 20 | 63 6f 75 6e 74 20 6f 66 |..; get |count of|
|00001a40| 20 63 74 6c 20 63 61 6c | 6c 73 0d 09 09 42 45 51 | ctl cal|ls...BEQ|
|00001a50| 2e 53 09 40 30 33 30 09 | 09 09 09 09 09 3b 20 6e |.S.@030.|.....; n|
|00001a60| 6f 6e 65 0d 40 30 32 30 | 0d 09 09 41 44 44 51 2e |one.@020|...ADDQ.|
|00001a70| 4c 09 23 38 2c 41 30 09 | 09 09 09 09 09 3b 20 73 |L.#8,A0.|.....; s|
|00001a80| 6b 69 70 20 63 74 6c 20 | 63 61 6c 6c 0d 09 09 53 |kip ctl |call...S|
|00001a90| 55 42 51 2e 57 09 23 31 | 2c 44 31 09 09 09 09 09 |UBQ.W.#1|,D1.....|
|00001aa0| 09 3b 20 73 75 62 20 31 | 20 66 72 6f 6d 20 63 6f |.; sub 1| from co|
|00001ab0| 75 6e 74 0d 09 09 42 4e | 45 2e 53 09 40 30 32 30 |unt...BN|E.S.@020|
|00001ac0| 09 09 09 09 09 09 3b 20 | 6d 6f 72 65 0d 40 30 33 |......; |more.@03|
|00001ad0| 30 0d 09 09 53 55 42 51 | 2e 57 09 23 31 2c 44 30 |0...SUBQ|.W.#1,D0|
|00001ae0| 09 09 09 09 09 09 3b 20 | 73 75 62 20 31 20 66 72 |......; |sub 1 fr|
|00001af0| 6f 6d 20 63 6f 75 6e 74 | 0d 09 09 42 4e 45 2e 53 |om count|...BNE.S|
|00001b00| 09 40 30 31 30 09 09 09 | 09 09 09 3b 20 6d 6f 72 |.@010...|...; mor|
|00001b10| 65 0d 09 09 42 52 41 09 | 09 46 72 61 63 73 44 6f |e...BRA.|.FracsDo|
|00001b20| 6e 65 09 09 09 09 09 3b | 20 63 6f 75 6c 64 20 6e |ne.....;| could n|
|00001b30| 6f 74 20 66 69 6e 64 20 | 6d 61 69 6e 20 73 63 72 |ot find |main scr|
|00001b40| 65 65 6e 0d 40 30 34 30 | 0d 09 09 43 4d 50 49 2e |een.@040|...CMPI.|
|00001b50| 57 09 23 31 33 30 2c 38 | 28 41 30 29 09 09 09 09 |W.#130,8|(A0)....|
|00001b60| 09 3b 20 31 36 20 63 6f | 6c 6f 72 73 20 3f 0d 09 |.; 16 co|lors ?..|
|00001b70| 09 42 45 51 2e 53 09 40 | 30 35 30 09 09 09 09 09 |.BEQ.S.@|050.....|
|00001b80| 09 3b 20 79 65 73 0d 09 | 09 43 4d 50 49 2e 57 09 |.; yes..|.CMPI.W.|
|00001b90| 23 31 33 31 2c 38 28 41 | 30 29 09 09 09 09 09 3b |#131,8(A|0).....;|
|00001ba0| 20 32 35 36 20 63 6f 6c | 6f 72 73 20 3f 0d 09 09 | 256 col|ors ?...|
|00001bb0| 42 45 51 2e 53 09 40 30 | 35 30 09 09 09 09 09 09 |BEQ.S.@0|50......|
|00001bc0| 3b 20 79 65 73 0d 0d 09 | 09 43 4c 52 2e 57 09 2d |; yes...|.CLR.W.-|
|00001bd0| 28 53 50 29 09 09 09 09 | 09 09 3b 20 72 65 73 75 |(SP)....|..; resu|
|00001be0| 6c 74 0d 09 09 4d 4f 56 | 45 2e 57 09 23 31 32 38 |lt...MOV|E.W.#128|
|00001bf0| 2c 2d 28 53 50 29 09 09 | 09 09 09 3b 20 27 41 4c |,-(SP)..|...; 'AL|
|00001c00| 52 54 27 20 69 64 0d 09 | 09 43 4c 52 2e 4c 09 2d |RT' id..|.CLR.L.-|
|00001c10| 28 53 50 29 09 09 09 09 | 09 09 3b 20 6e 6f 20 66 |(SP)....|..; no f|
|00001c20| 69 6c 74 65 72 20 70 72 | 6f 63 0d 09 09 5f 53 74 |ilter pr|oc..._St|
|00001c30| 6f 70 41 6c 65 72 74 09 | 09 09 09 09 09 09 3b 20 |opAlert.|......; |
|00001c40| 74 65 6c 6c 20 77 68 79 | 20 77 65 72 65 20 6e 6f |tell why| were no|
|00001c50| 74 20 72 75 6e 6e 69 6e | 67 0d 09 09 41 44 44 51 |t runnin|g...ADDQ|
|00001c60| 2e 4c 09 23 32 2c 53 50 | 09 09 09 09 09 09 3b 20 |.L.#2,SP|......; |
|00001c70| 64 6f 6e 27 74 20 63 61 | 72 65 0d 09 09 42 52 41 |don't ca|re...BRA|
|00001c80| 09 09 46 72 61 63 73 44 | 6f 6e 65 09 09 09 09 09 |..FracsD|one.....|
|00001c90| 3b 20 6e 6f 74 20 65 6e | 6f 75 67 68 20 63 6f 6c |; not en|ough col|
|00001ca0| 6f 72 73 0d 40 30 35 30 | 0d 0d 09 09 43 4c 52 2e |ors.@050|....CLR.|
|00001cb0| 4c 09 2d 28 53 50 29 09 | 09 09 09 09 09 3b 20 44 |L.-(SP).|.....; D|
|00001cc0| 69 61 6c 6f 67 50 74 72 | 0d 09 09 4d 4f 56 45 2e |ialogPtr|...MOVE.|
|00001cd0| 57 09 23 31 33 30 2c 2d | 28 53 50 29 09 09 09 09 |W.#130,-|(SP)....|
|00001ce0| 09 3b 20 64 69 61 6c 6f | 67 49 44 0d 09 09 43 4c |.; dialo|gID...CL|
|00001cf0| 52 2e 4c 09 2d 28 53 50 | 29 09 09 09 09 09 09 3b |R.L.-(SP|)......;|
|00001d00| 20 64 53 74 6f 72 61 67 | 65 0d 09 09 4d 4f 56 45 | dStorag|e...MOVE|
|00001d10| 2e 4c 09 23 2d 31 2c 2d | 28 53 50 29 09 09 09 09 |.L.#-1,-|(SP)....|
|00001d20| 09 3b 20 62 65 68 69 6e | 64 0d 09 09 5f 47 65 74 |.; behin|d..._Get|
|00001d30| 4e 65 77 44 69 61 6c 6f | 67 09 09 09 09 09 09 3b |NewDialo|g......;|
|00001d40| 0d 09 09 4d 4f 56 45 2e | 4c 09 28 53 50 29 2b 2c |...MOVE.|L.(SP)+,|
|00001d50| 6f 75 72 44 6c 6f 67 50 | 74 72 28 41 36 29 09 09 |ourDlogP|tr(A6)..|
|00001d60| 3b 0d 09 09 0d 09 09 4d | 4f 56 45 2e 4c 09 6f 75 |;......M|OVE.L.ou|
|00001d70| 72 44 6c 6f 67 50 74 72 | 28 41 36 29 2c 2d 28 53 |rDlogPtr|(A6),-(S|
|00001d80| 50 29 09 09 3b 20 44 69 | 61 6c 6f 67 50 74 72 0d |P)..; Di|alogPtr.|
|00001d90| 09 09 5f 53 65 74 50 6f | 72 74 09 09 09 09 09 09 |.._SetPo|rt......|
|00001da0| 09 3b 0d 09 09 0d 09 09 | 4d 4f 56 45 2e 4c 09 6f |.;......|MOVE.L.o|
|00001db0| 75 72 44 6c 6f 67 50 74 | 72 28 41 36 29 2c 2d 28 |urDlogPt|r(A6),-(|
|00001dc0| 53 50 29 09 09 3b 20 44 | 69 61 6c 6f 67 50 74 72 |SP)..; D|ialogPtr|
|00001dd0| 0d 09 09 4d 4f 56 45 2e | 57 09 23 31 2c 2d 28 53 |...MOVE.|W.#1,-(S|
|00001de0| 50 29 09 09 09 09 09 3b | 20 69 74 65 6d 4e 6f 0d |P).....;| itemNo.|
|00001df0| 09 09 50 45 41 2e 4c 09 | 64 75 6d 6d 79 54 79 70 |..PEA.L.|dummyTyp|
|00001e00| 65 28 41 36 29 09 09 09 | 09 3b 20 56 41 52 20 69 |e(A6)...|.; VAR i|
|00001e10| 74 65 6d 54 79 70 65 0d | 09 09 50 45 41 2e 4c 09 |temType.|..PEA.L.|
|00001e20| 69 74 65 6d 48 61 6e 64 | 6c 65 28 41 36 29 09 09 |itemHand|le(A6)..|
|00001e30| 09 09 3b 20 56 41 52 20 | 69 74 65 6d 0d 09 09 50 |..; VAR |item...P|
|00001e40| 45 41 2e 4c 09 64 75 6d | 6d 79 52 65 63 74 28 41 |EA.L.dum|myRect(A|
|00001e50| 36 29 09 09 09 09 3b 20 | 56 41 52 20 69 74 65 6d |6)....; |VAR item|
|00001e60| 52 65 63 74 0d 09 09 5f | 47 65 74 44 49 74 65 6d |Rect..._|GetDItem|
|00001e70| 09 09 09 09 09 09 09 3b | 0d 09 09 0d 09 09 4d 4f |.......;|......MO|
|00001e80| 56 45 2e 4c 09 23 24 30 | 30 30 33 30 30 30 33 2c |VE.L.#$0|0030003,|
|00001e90| 2d 28 53 50 29 09 09 09 | 3b 20 76 20 26 20 68 0d |-(SP)...|; v & h.|
|00001ea0| 09 09 5f 50 65 6e 53 69 | 7a 65 09 09 09 09 09 09 |.._PenSi|ze......|
|00001eb0| 09 3b 0d 09 09 50 45 41 | 2e 4c 09 64 75 6d 6d 79 |.;...PEA|.L.dummy|
|00001ec0| 52 65 63 74 28 41 36 29 | 09 09 09 09 3b 0d 09 09 |Rect(A6)|....;...|
|00001ed0| 4d 4f 56 45 2e 4c 09 23 | 24 46 46 46 43 46 46 46 |MOVE.L.#|$FFFCFFF|
|00001ee0| 43 2c 2d 28 53 50 29 09 | 09 09 3b 20 56 20 26 20 |C,-(SP).|..; V & |
|00001ef0| 48 0d 09 09 5f 49 6e 73 | 65 74 52 65 63 74 09 09 |H..._Ins|etRect..|
|00001f00| 09 09 09 09 09 3b 0d 09 | 09 50 45 41 2e 4c 09 64 |.....;..|.PEA.L.d|
|00001f10| 75 6d 6d 79 52 65 63 74 | 28 41 36 29 09 09 09 09 |ummyRect|(A6)....|
|00001f20| 3b 0d 09 09 4d 4f 56 45 | 2e 4c 09 23 24 30 30 31 |;...MOVE|.L.#$001|
|00001f30| 30 30 30 31 30 2c 2d 28 | 53 50 29 09 09 09 3b 20 |00010,-(|SP)...; |
|00001f40| 56 20 26 20 48 0d 09 09 | 5f 46 72 61 6d 65 52 6f |V & H...|_FrameRo|
|00001f50| 75 6e 64 52 65 63 74 09 | 09 09 09 09 09 3b 0d 0d |undRect.|.....;..|
|00001f60| 09 09 4d 4f 56 45 2e 57 | 09 23 33 2c 44 30 09 09 |..MOVE.W|.#3,D0..|
|00001f70| 09 09 09 09 3b 0d 40 30 | 35 35 0d 09 09 4d 4f 56 |....;.@0|55...MOV|
|00001f80| 45 2e 4c 09 6f 75 72 44 | 6c 6f 67 50 74 72 28 41 |E.L.ourD|logPtr(A|
|00001f90| 36 29 2c 2d 28 53 50 29 | 09 09 3b 20 44 69 61 6c |6),-(SP)|..; Dial|
|00001fa0| 6f 67 50 74 72 0d 09 09 | 4d 4f 56 45 2e 57 09 44 |ogPtr...|MOVE.W.D|
|00001fb0| 30 2c 2d 28 53 50 29 09 | 09 09 09 09 3b 20 69 74 |0,-(SP).|....; it|
|00001fc0| 65 6d 4e 6f 0d 09 09 4d | 4f 56 45 2e 57 09 23 30 |emNo...M|OVE.W.#0|
|00001fd0| 2c 2d 28 53 50 29 09 09 | 09 09 09 3b 20 73 74 72 |,-(SP)..|...; str|
|00001fe0| 74 53 65 6c 0d 09 09 4d | 4f 56 45 2e 57 09 23 33 |tSel...M|OVE.W.#3|
|00001ff0| 32 37 36 37 2c 2d 28 53 | 50 29 09 09 09 09 3b 20 |2767,-(S|P)....; |
|00002000| 65 6e 64 53 65 6c 0d 09 | 09 5f 53 65 6c 49 54 65 |endSel..|._SelITe|
|00002010| 78 74 0d 09 09 0d 09 09 | 43 4c 52 2e 4c 09 2d 28 |xt......|CLR.L.-(|
|00002020| 53 50 29 09 09 09 09 09 | 09 3b 20 66 69 6c 74 65 |SP).....|.; filte|
|00002030| 72 50 72 6f 63 0d 09 09 | 50 45 41 2e 4c 09 69 74 |rProc...|PEA.L.it|
|00002040| 65 6d 48 69 74 49 6e 74 | 28 41 36 29 09 09 09 09 |emHitInt|(A6)....|
|00002050| 3b 20 56 41 52 20 69 74 | 65 6d 48 69 74 0d 09 09 |; VAR it|emHit...|
|00002060| 5f 4d 6f 64 61 6c 44 69 | 61 6c 6f 67 09 09 09 09 |_ModalDi|alog....|
|00002070| 09 09 3b 0d 09 09 43 4d | 50 49 2e 57 09 23 31 2c |..;...CM|PI.W.#1,|
|00002080| 69 74 65 6d 48 69 74 49 | 6e 74 28 41 36 29 09 09 |itemHitI|nt(A6)..|
|00002090| 09 3b 0d 09 09 42 45 51 | 2e 53 09 40 30 36 30 09 |.;...BEQ|.S.@060.|
|000020a0| 09 09 09 09 09 3b 0d 0d | 09 09 4d 4f 56 45 2e 4c |.....;..|..MOVE.L|
|000020b0| 09 6f 75 72 44 6c 6f 67 | 50 74 72 28 41 36 29 2c |.ourDlog|Ptr(A6),|
|000020c0| 2d 28 53 50 29 09 09 3b | 0d 09 09 5f 44 69 73 70 |-(SP)..;|..._Disp|
|000020d0| 6f 73 44 69 61 6c 6f 67 | 09 09 09 09 09 09 3b 0d |osDialog|......;.|
|000020e0| 0d 09 09 42 52 41 09 09 | 46 72 61 63 73 44 6f 6e |...BRA..|FracsDon|
|000020f0| 65 09 09 09 09 09 3b 0d | 0d 40 30 36 30 0d 09 09 |e.....;.|.@060...|
|00002100| 4d 4f 56 45 2e 57 09 23 | 33 2c 44 30 09 09 09 09 |MOVE.W.#|3,D0....|
|00002110| 09 09 3b 0d 09 09 42 53 | 52 09 09 47 65 74 46 69 |..;...BS|R..GetFi|
|00002120| 65 6c 64 52 74 6e 09 09 | 09 09 09 3b 0d 09 09 42 |eldRtn..|...;...B|
|00002130| 53 52 09 09 43 6f 6e 76 | 65 72 74 46 69 65 6c 64 |SR..Conv|ertField|
|00002140| 52 74 6e 09 09 09 09 3b | 0d 09 09 42 45 51 09 09 |Rtn....;|...BEQ..|
|00002150| 40 30 36 35 09 09 09 09 | 09 09 3b 0d 09 09 4d 4f |@065....|..;...MO|
|00002160| 56 45 2e 57 09 23 33 2c | 44 30 09 09 09 09 09 09 |VE.W.#3,|D0......|
|00002170| 3b 0d 09 09 42 52 41 2e | 53 09 40 30 35 35 09 09 |;...BRA.|S.@055..|
|00002180| 09 09 09 09 3b 0d 40 30 | 36 35 0d 09 09 46 4d 4f |....;.@0|65...FMO|
|00002190| 56 45 2e 58 09 46 50 30 | 2c 73 65 65 64 48 28 41 |VE.X.FP0|,seedH(A|
|000021a0| 36 29 09 09 09 09 3b 20 | 67 65 74 20 72 65 73 75 |6)....; |get resu|
|000021b0| 6c 74 0d 09 09 0d 09 09 | 4d 4f 56 45 2e 57 09 23 |lt......|MOVE.W.#|
|000021c0| 34 2c 44 30 09 09 09 09 | 09 09 3b 0d 09 09 42 53 |4,D0....|..;...BS|
|000021d0| 52 09 09 47 65 74 46 69 | 65 6c 64 52 74 6e 09 09 |R..GetFi|eldRtn..|
|000021e0| 09 09 09 3b 0d 09 09 42 | 53 52 09 09 43 6f 6e 76 |...;...B|SR..Conv|
|000021f0| 65 72 74 46 69 65 6c 64 | 52 74 6e 09 09 09 09 3b |ertField|Rtn....;|
|00002200| 0d 09 09 42 45 51 09 09 | 40 30 37 30 09 09 09 09 |...BEQ..|@070....|
|00002210| 09 09 3b 0d 09 09 4d 4f | 56 45 2e 57 09 23 34 2c |..;...MO|VE.W.#4,|
|00002220| 44 30 09 09 09 09 09 09 | 3b 0d 09 09 42 52 41 2e |D0......|;...BRA.|
|00002230| 53 09 40 30 35 35 09 09 | 09 09 09 09 3b 0d 40 30 |S.@055..|....;.@0|
|00002240| 37 30 0d 09 09 46 4d 4f | 56 45 2e 58 09 46 50 30 |70...FMO|VE.X.FP0|
|00002250| 2c 73 65 65 64 56 28 41 | 36 29 09 09 09 09 3b 0d |,seedV(A|6)....;.|
|00002260| 09 09 0d 09 09 4d 4f 56 | 45 2e 57 09 23 35 2c 44 |.....MOV|E.W.#5,D|
|00002270| 30 09 09 09 09 09 09 3b | 0d 09 09 42 53 52 09 09 |0......;|...BSR..|
|00002280| 47 65 74 46 69 65 6c 64 | 52 74 6e 09 09 09 09 09 |GetField|Rtn.....|
|00002290| 3b 0d 09 09 42 53 52 09 | 09 43 6f 6e 76 65 72 74 |;...BSR.|.Convert|
|000022a0| 46 69 65 6c 64 52 74 6e | 09 09 09 09 3b 0d 09 09 |FieldRtn|....;...|
|000022b0| 42 45 51 09 09 40 30 37 | 35 09 09 09 09 09 09 3b |BEQ..@07|5......;|
|000022c0| 0d 09 09 4d 4f 56 45 2e | 57 09 23 35 2c 44 30 09 |...MOVE.|W.#5,D0.|
|000022d0| 09 09 09 09 09 3b 0d 09 | 09 42 52 41 2e 53 09 40 |.....;..|.BRA.S.@|
|000022e0| 30 35 35 09 09 09 09 09 | 09 3b 0d 40 30 37 35 0d |055.....|.;.@075.|
|000022f0| 09 09 46 4d 4f 56 45 2e | 57 09 46 50 30 2c 6c 69 |..FMOVE.|W.FP0,li|
|00002300| 6d 69 74 28 41 36 29 09 | 09 09 09 3b 0d 09 09 0d |mit(A6).|...;....|
|00002310| 09 09 4d 4f 56 45 2e 4c | 09 6f 75 72 44 6c 6f 67 |..MOVE.L|.ourDlog|
|00002320| 50 74 72 28 41 36 29 2c | 2d 28 53 50 29 09 09 3b |Ptr(A6),|-(SP)..;|
|00002330| 0d 09 09 5f 44 69 73 70 | 6f 73 44 69 61 6c 6f 67 |..._Disp|osDialog|
|00002340| 09 09 09 09 09 09 3b 0d | 09 09 0d 40 31 30 30 0d |......;.|...@100.|
|00002350| 09 09 43 4c 52 2e 4c 09 | 2d 28 53 50 29 09 09 09 |..CLR.L.|-(SP)...|
|00002360| 09 09 09 3b 20 57 69 6e | 64 6f 77 50 74 72 0d 09 |...; Win|dowPtr..|
|00002370| 09 43 4c 52 2e 4c 09 2d | 28 53 50 29 09 09 09 09 |.CLR.L.-|(SP)....|
|00002380| 09 09 3b 20 77 53 74 6f | 72 61 67 65 0d 09 09 50 |..; wSto|rage...P|
|00002390| 45 41 2e 4c 09 62 52 65 | 63 74 09 09 09 09 09 09 |EA.L.bRe|ct......|
|000023a0| 3b 20 62 6f 75 6e 64 73 | 52 65 63 74 0d 09 09 50 |; bounds|Rect...P|
|000023b0| 45 41 2e 4c 09 77 54 69 | 74 6c 65 09 09 09 09 09 |EA.L.wTi|tle.....|
|000023c0| 09 3b 20 77 54 69 74 6c | 65 0d 09 09 4d 4f 56 45 |.; wTitl|e...MOVE|
|000023d0| 2e 42 09 23 74 72 75 65 | 2c 2d 28 53 50 29 09 09 |.B.#true|,-(SP)..|
|000023e0| 09 09 09 3b 20 76 69 73 | 69 62 6c 65 0d 09 09 4d |...; vis|ible...M|
|000023f0| 4f 56 45 2e 57 09 23 6e | 6f 47 72 6f 77 44 6f 63 |OVE.W.#n|oGrowDoc|
|00002400| 50 72 6f 63 2c 2d 28 53 | 50 29 09 09 3b 20 70 72 |Proc,-(S|P)..; pr|
|00002410| 6f 63 49 44 0d 09 09 4d | 4f 56 45 2e 4c 09 23 2d |ocID...M|OVE.L.#-|
|00002420| 31 2c 2d 28 53 50 29 09 | 09 09 09 09 3b 20 62 65 |1,-(SP).|....; be|
|00002430| 68 69 6e 64 0d 09 09 4d | 4f 56 45 2e 42 09 23 74 |hind...M|OVE.B.#t|
|00002440| 72 75 65 2c 2d 28 53 50 | 29 09 09 09 09 09 3b 20 |rue,-(SP|).....; |
|00002450| 67 6f 41 77 61 79 46 6c | 61 67 0d 09 09 43 4c 52 |goAwayFl|ag...CLR|
|00002460| 2e 4c 09 2d 28 53 50 29 | 09 09 09 09 09 09 3b 20 |.L.-(SP)|......; |
|00002470| 72 65 66 43 6f 6e 0d 09 | 09 5f 4e 65 77 43 57 69 |refCon..|._NewCWi|
|00002480| 6e 64 6f 77 09 09 09 09 | 09 09 09 3b 0d 09 09 4d |ndow....|...;...M|
|00002490| 4f 56 45 2e 4c 09 28 53 | 50 29 2c 6f 75 72 57 69 |OVE.L.(S|P),ourWi|
|000024a0| 6e 64 50 74 72 28 41 36 | 29 09 09 09 3b 0d 09 09 |ndPtr(A6|)...;...|
|000024b0| 5f 53 65 74 50 6f 72 74 | 09 09 09 09 09 09 09 3b |_SetPort|.......;|
|000024c0| 0d 0d 09 09 43 4c 52 2e | 4c 09 2d 28 53 50 29 09 |....CLR.|L.-(SP).|
|000024d0| 09 09 09 09 09 3b 20 50 | 69 78 4d 61 70 48 61 6e |.....; P|ixMapHan|
|000024e0| 64 6c 65 0d 09 09 5f 4e | 65 77 50 69 78 4d 61 70 |dle..._N|ewPixMap|
|000024f0| 09 09 09 09 09 09 09 3b | 0d 09 09 4d 4f 56 45 2e |.......;|...MOVE.|
|00002500| 4c 09 28 53 50 29 2b 2c | 6f 75 72 50 69 78 4d 61 |L.(SP)+,|ourPixMa|
|00002510| 70 28 41 36 29 09 09 09 | 3b 0d 09 09 0d 09 09 4d |p(A6)...|;......M|
|00002520| 4f 56 45 2e 4c 09 6f 75 | 72 57 69 6e 64 50 74 72 |OVE.L.ou|rWindPtr|
|00002530| 28 41 36 29 2c 41 30 09 | 09 09 3b 0d 09 09 4d 4f |(A6),A0.|..;...MO|
|00002540| 56 45 2e 4c 09 70 6f 72 | 74 50 69 78 4d 61 70 28 |VE.L.por|tPixMap(|
|00002550| 41 30 29 2c 2d 28 53 50 | 29 09 09 3b 20 67 65 74 |A0),-(SP|)..; get|
|00002560| 20 68 61 6e 64 6c 65 20 | 74 6f 20 63 47 72 61 66 | handle |to cGraf|
|00002570| 50 6f 72 74 20 70 69 78 | 20 6d 61 70 0d 09 09 4d |Port pix| map...M|
|00002580| 4f 56 45 2e 4c 09 6f 75 | 72 50 69 78 4d 61 70 28 |OVE.L.ou|rPixMap(|
|00002590| 41 36 29 2c 2d 28 53 50 | 29 09 09 09 3b 20 6f 75 |A6),-(SP|)...; ou|
|000025a0| 72 20 70 69 78 20 6d 61 | 70 0d 09 09 5f 43 6f 70 |r pix ma|p..._Cop|
|000025b0| 79 50 69 78 4d 61 70 09 | 09 09 09 09 09 09 3b 20 |yPixMap.|......; |
|000025c0| 63 6f 70 79 20 28 74 6f | 20 67 65 74 20 63 6f 6c |copy (to| get col|
|000025d0| 6f 72 20 74 61 62 6c 65 | 29 0d 09 09 0d 09 09 4d |or table|)......M|
|000025e0| 4f 56 45 2e 4c 09 6f 75 | 72 50 69 78 4d 61 70 28 |OVE.L.ou|rPixMap(|
|000025f0| 41 36 29 2c 41 30 09 09 | 09 3b 20 67 65 74 20 68 |A6),A0..|.; get h|
|00002600| 61 6e 64 6c 65 0d 09 09 | 4d 4f 56 45 2e 4c 09 28 |andle...|MOVE.L.(|
|00002610| 41 30 29 2c 41 30 09 09 | 09 09 09 09 3b 20 64 65 |A0),A0..|....; de|
|00002620| 2d 72 65 66 20 69 74 0d | 09 09 4d 4f 56 45 2e 4c |-ref it.|..MOVE.L|
|00002630| 09 70 6d 54 61 62 6c 65 | 28 41 30 29 2c 2d 28 53 |.pmTable|(A0),-(S|
|00002640| 50 29 09 09 09 3b 20 67 | 65 74 20 63 2d 74 61 62 |P)...; g|et c-tab|
|00002650| 20 68 61 6e 64 6c 65 0d | 09 09 5f 44 69 73 70 6f | handle.|.._Dispo|
|00002660| 73 43 54 61 62 6c 65 09 | 09 09 09 09 09 3b 20 72 |sCTable.|.....; r|
|00002670| 65 6c 65 61 73 65 20 70 | 72 65 76 20 74 61 62 6c |elease p|rev tabl|
|00002680| 65 0d 0d 09 09 43 4c 52 | 2e 4c 09 2d 28 53 50 29 |e....CLR|.L.-(SP)|
|00002690| 09 09 09 09 09 09 3b 20 | 72 65 73 75 6c 74 0d 09 |......; |result..|
|000026a0| 09 4d 4f 56 45 2e 57 09 | 23 31 32 38 2c 2d 28 53 |.MOVE.W.|#128,-(S|
|000026b0| 50 29 09 09 09 09 09 3b | 20 27 63 6c 75 74 27 20 |P).....;| 'clut' |
|000026c0| 49 44 20 6e 75 6d 62 65 | 72 0d 09 09 5f 47 65 74 |ID numbe|r..._Get|
|000026d0| 43 54 61 62 6c 65 09 09 | 09 09 09 09 09 3b 20 67 |CTable..|.....; g|
|000026e0| 65 74 20 6f 75 72 20 74 | 61 62 6c 65 0d 09 09 4d |et our t|able...M|
|000026f0| 4f 56 45 2e 4c 09 28 53 | 50 29 2c 41 30 09 09 09 |OVE.L.(S|P),A0...|
|00002700| 09 09 09 3b 20 6f 75 72 | 20 74 61 62 6c 65 73 20 |...; our| tables |
|00002710| 6e 65 77 20 68 61 6e 64 | 6c 65 0d 09 09 4d 4f 56 |new hand|le...MOV|
|00002720| 45 2e 4c 09 41 30 2c 2d | 28 53 50 29 09 09 09 09 |E.L.A0,-|(SP)....|
|00002730| 09 3b 20 72 65 73 6f 75 | 72 63 65 20 74 6f 20 64 |.; resou|rce to d|
|00002740| 65 74 61 63 68 0d 09 09 | 5f 44 65 74 61 63 68 52 |etach...|_DetachR|
|00002750| 65 73 6f 75 72 63 65 09 | 09 09 09 09 09 3b 20 64 |esource.|.....; d|
|00002760| 69 73 63 6f 20 69 74 0d | 09 09 0d 09 09 4d 4f 56 |isco it.|.....MOV|
|00002770| 45 2e 4c 09 6f 75 72 50 | 69 78 4d 61 70 28 41 36 |E.L.ourP|ixMap(A6|
|00002780| 29 2c 41 30 09 09 09 3b | 20 67 65 74 20 68 61 6e |),A0...;| get han|
|00002790| 64 6c 65 0d 09 09 4d 4f | 56 45 2e 4c 09 28 41 30 |dle...MO|VE.L.(A0|
|000027a0| 29 2c 41 30 09 09 09 09 | 09 09 3b 20 64 65 2d 72 |),A0....|..; de-r|
|000027b0| 65 66 20 69 74 0d 09 09 | 4d 4f 56 45 2e 4c 09 28 |ef it...|MOVE.L.(|
|000027c0| 53 50 29 2b 2c 70 6d 54 | 61 62 6c 65 28 41 30 29 |SP)+,pmT|able(A0)|
|000027d0| 09 09 09 3b 20 73 65 74 | 20 6e 65 77 20 74 61 62 |...; set| new tab|
|000027e0| 6c 65 09 09 0d 0d 09 09 | 4d 4f 56 45 2e 4c 09 77 |le......|MOVE.L.w|
|000027f0| 61 74 63 68 43 75 72 73 | 6f 72 48 61 6e 64 28 41 |atchCurs|orHand(A|
|00002800| 36 29 2c 41 30 09 09 3b | 20 68 61 6e 64 6c 65 0d |6),A0..;| handle.|
|00002810| 09 09 5f 48 4c 6f 63 6b | 09 09 09 09 09 09 09 09 |.._HLock|........|
|00002820| 3b 20 68 61 6e 67 20 6f | 6e 20 74 6f 20 69 74 0d |; hang o|n to it.|
|00002830| 09 09 0d 09 09 4d 4f 56 | 45 2e 4c 09 77 61 74 63 |.....MOV|E.L.watc|
|00002840| 68 43 75 72 73 6f 72 48 | 61 6e 64 28 41 36 29 2c |hCursorH|and(A6),|
|00002850| 41 30 09 09 3b 20 68 61 | 6e 64 6c 65 0d 09 09 4d |A0..; ha|ndle...M|
|00002860| 4f 56 45 2e 4c 09 28 41 | 30 29 2c 2d 28 53 50 29 |OVE.L.(A|0),-(SP)|
|00002870| 09 09 09 09 09 3b 20 70 | 74 72 0d 09 09 5f 53 65 |.....; p|tr..._Se|
|00002880| 74 43 75 72 73 6f 72 09 | 09 09 09 09 09 09 3b 20 |tCursor.|......; |
|00002890| 6c 65 74 27 73 20 64 6f | 20 74 68 65 20 77 61 69 |let's do| the wai|
|000028a0| 74 20 74 68 69 6e 67 0d | 09 09 0d 09 09 4d 4f 56 |t thing.|.....MOV|
|000028b0| 45 2e 4c 09 77 61 74 63 | 68 43 75 72 73 6f 72 48 |E.L.watc|hCursorH|
|000028c0| 61 6e 64 28 41 36 29 2c | 41 30 09 09 3b 20 68 61 |and(A6),|A0..; ha|
|000028d0| 6e 64 6c 65 0d 09 09 5f | 48 55 6e 6c 6f 63 6b 09 |ndle..._|HUnlock.|
|000028e0| 09 09 09 09 09 09 3b 20 | 66 72 65 65 20 69 74 0d |......; |free it.|
|000028f0| 0d 3b 09 2f 2a 20 6d 61 | 70 20 73 63 72 65 65 6e |.;./* ma|p screen|
|00002900| 20 6f 6e 74 6f 20 2d 32 | 20 74 6f 20 32 20 72 61 | onto -2| to 2 ra|
|00002910| 6e 67 65 20 2a 2f 0d 3b | 09 0d 3b 09 2f 2a 20 30 |nge */.;|..;./* 0|
|00002920| 2c 30 20 69 73 20 61 74 | 20 35 31 32 2f 32 2c 20 |,0 is at| 512/2, |
|00002930| 33 34 32 2f 32 20 3d 20 | 32 35 36 2c 31 37 31 20 |342/2 = |256,171 |
|00002940| 2a 2f 0d 3b 09 0d 3b 09 | 2f 2a 20 67 72 69 64 64 |*/.;..;.|/* gridd|
|00002950| 69 6e 67 20 74 6f 20 72 | 65 73 20 72 65 71 75 69 |ing to r|es requi|
|00002960| 72 65 73 20 74 68 61 74 | 20 49 20 66 69 6e 64 20 |res that| I find |
|00002970| 6f 75 74 20 68 6f 77 20 | 6d 61 6e 79 20 62 6f 78 |out how |many box|
|00002980| 65 73 20 77 69 64 65 20 | 61 6e 64 20 74 61 6c 6c |es wide |and tall|
|00002990| 0d 3b 09 20 20 20 74 68 | 65 20 69 6d 61 67 65 20 |.;.   th|e image |
|000029a0| 69 73 2c 20 61 6e 64 20 | 6d 61 70 20 65 61 63 68 |is, and |map each|
|000029b0| 20 62 6f 78 20 6f 6e 74 | 6f 20 61 20 76 61 6c 75 | box ont|o a valu|
|000029c0| 65 20 69 6e 20 72 32 2e | 20 20 74 68 65 6e 20 69 |e in r2.|  then i|
|000029d0| 20 69 74 65 72 61 74 65 | 20 6f 76 65 72 0d 3b 09 | iterate| over.;.|
|000029e0| 20 20 20 61 6c 6c 20 74 | 68 65 20 62 6f 78 65 73 |   all t|he boxes|
|000029f0| 20 63 61 6c 6c 69 6e 67 | 20 74 68 65 20 66 75 6e | calling| the fun|
|00002a00| 63 74 69 6f 6e 20 75 6e | 74 69 6c 20 74 68 65 20 |ction un|til the |
|00002a10| 78 20 6f 72 20 79 20 65 | 78 63 65 65 64 73 20 73 |x or y e|xceeds s|
|00002a20| 6f 6d 65 20 6c 69 6d 69 | 74 2e 0d 3b 09 20 20 20 |ome limi|t..;.   |
|00002a30| 74 68 65 6e 20 69 20 6d | 61 70 20 74 68 65 20 6e |then i m|ap the n|
|00002a40| 75 6d 62 65 72 20 6f 66 | 20 69 74 65 72 61 74 69 |umber of| iterati|
|00002a50| 6f 6e 73 20 69 6e 74 6f | 20 61 20 27 63 6f 6c 6f |ons into| a 'colo|
|00002a60| 72 27 20 2a 2f 0d 3b 09 | 20 20 20 0d 3b 20 20 20 |r' */.;.|   .;   |
|00002a70| 20 2f 2a 20 73 69 6e 63 | 65 20 77 65 20 64 6f 6e | /* sinc|e we don|
|00002a80| 27 74 20 68 61 76 65 20 | 61 20 67 6c 6f 62 61 6c |'t have |a global|
|00002a90| 20 64 61 74 61 20 61 72 | 65 61 20 66 6f 72 20 65 | data ar|ea for e|
|00002aa0| 78 74 65 6e 64 65 64 20 | 63 6f 6e 73 74 61 6e 74 |xtended |constant|
|00002ab0| 73 20 74 6f 20 6c 69 76 | 65 20 69 6e 2c 0d 3b 09 |s to liv|e in,.;.|
|00002ac0| 20 20 20 75 73 65 20 6c | 6f 6e 67 73 20 61 6e 64 |   use l|ongs and|
|00002ad0| 20 66 61 6b 65 20 74 68 | 65 20 63 6f 6d 70 69 6c | fake th|e compil|
|00002ae0| 65 72 20 69 6e 74 6f 20 | 6d 61 6b 69 6e 67 20 74 |er into |making t|
|00002af0| 68 65 20 63 6f 72 72 65 | 63 74 20 53 41 4e 45 20 |he corre|ct SANE |
|00002b00| 63 61 6c 6c 73 20 74 6f | 20 0d 3b 09 20 20 20 62 |calls to| .;.   b|
|00002b10| 75 69 6c 64 20 74 68 65 | 20 65 78 74 65 6e 64 65 |uild the| extende|
|00002b20| 64 20 76 61 6c 75 65 73 | 2e 20 20 49 73 20 74 68 |d values|.  Is th|
|00002b30| 65 72 65 20 61 20 62 65 | 74 74 65 72 20 77 61 79 |ere a be|tter way|
|00002b40| 20 28 62 65 73 69 64 65 | 73 20 75 73 69 6e 67 20 | (beside|s using |
|00002b50| 50 61 73 63 61 6c 21 29 | 20 2a 2f 0d 3b 0d 0d 09 |Pascal!)| */.;...|
|00002b60| 09 43 4c 52 2e 4c 09 44 | 30 09 09 09 09 09 09 09 |.CLR.L.D|0.......|
|00002b70| 3b 0d 09 09 4d 4f 56 45 | 2e 57 09 62 52 65 63 74 |;...MOVE|.W.bRect|
|00002b80| 2b 36 2c 44 30 09 09 09 | 09 09 3b 20 67 65 74 20 |+6,D0...|..; get |
|00002b90| 72 69 67 68 74 0d 09 09 | 53 55 42 2e 57 09 62 52 |right...|SUB.W.bR|
|00002ba0| 65 63 74 2b 32 2c 44 30 | 09 09 09 09 09 3b 20 73 |ect+2,D0|.....; s|
|00002bb0| 75 62 20 6c 65 66 74 0d | 09 09 41 44 44 51 2e 57 |ub left.|..ADDQ.W|
|00002bc0| 09 23 31 2c 44 30 09 09 | 09 09 09 09 3b 0d 09 09 |.#1,D0..|....;...|
|00002bd0| 4c 53 52 2e 4c 09 23 31 | 2c 44 30 09 09 09 09 09 |LSR.L.#1|,D0.....|
|00002be0| 09 3b 20 64 69 76 69 64 | 65 20 62 79 20 32 0d 09 |.; divid|e by 2..|
|00002bf0| 09 4d 4f 56 45 2e 4c 09 | 44 30 2c 66 61 6b 65 32 |.MOVE.L.|D0,fake2|
|00002c00| 35 36 28 41 36 29 09 09 | 09 09 3b 0d 09 09 0d 09 |56(A6)..|..;.....|
|00002c10| 09 43 4c 52 2e 4c 09 44 | 30 09 09 09 09 09 09 09 |.CLR.L.D|0.......|
|00002c20| 3b 0d 09 09 4d 4f 56 45 | 2e 57 09 62 52 65 63 74 |;...MOVE|.W.bRect|
|00002c30| 2b 34 2c 44 30 09 09 09 | 09 09 3b 20 67 65 74 20 |+4,D0...|..; get |
|00002c40| 62 6f 74 74 6f 6d 0d 09 | 09 53 55 42 2e 57 09 62 |bottom..|.SUB.W.b|
|00002c50| 52 65 63 74 2c 44 30 09 | 09 09 09 09 3b 20 73 75 |Rect,D0.|....; su|
|00002c60| 62 20 74 6f 70 0d 09 09 | 41 44 44 51 2e 57 09 23 |b top...|ADDQ.W.#|
|00002c70| 31 2c 44 30 09 09 09 09 | 09 09 3b 0d 09 09 4c 53 |1,D0....|..;...LS|
|00002c80| 52 2e 4c 09 23 31 2c 44 | 30 09 09 09 09 09 09 3b |R.L.#1,D|0......;|
|00002c90| 20 64 69 76 69 64 65 20 | 62 79 20 32 0d 09 09 4d | divide |by 2...M|
|00002ca0| 4f 56 45 2e 4c 09 44 30 | 2c 66 61 6b 65 31 37 31 |OVE.L.D0|,fake171|
|00002cb0| 28 41 36 29 09 09 09 09 | 3b 0d 09 09 0d 09 09 4d |(A6)....|;......M|
|00002cc0| 4f 56 45 2e 4c 09 23 32 | 2c 66 61 6b 65 32 28 41 |OVE.L.#2|,fake2(A|
|00002cd0| 36 29 09 09 09 09 3b 20 | 66 61 6b 65 32 20 3d 20 |6)....; |fake2 = |
|00002ce0| 32 0d 09 09 0d 09 09 4d | 4f 56 45 2e 4c 09 23 31 |2......M|OVE.L.#1|
|00002cf0| 30 30 2c 66 61 6b 65 31 | 30 30 28 41 36 29 09 09 |00,fake1|00(A6)..|
|00002d00| 09 3b 20 66 61 6b 65 31 | 30 30 20 3d 20 31 30 30 |.; fake1|00 = 100|
|00002d10| 0d 0d 09 09 4d 4f 56 45 | 2e 4c 09 66 61 6b 65 32 |....MOVE|.L.fake2|
|00002d20| 35 36 28 41 36 29 2c 44 | 30 09 09 09 09 3b 20 68 |56(A6),D|0....; h|
|00002d30| 73 69 7a 65 20 3d 20 28 | 66 61 6b 65 32 35 36 2f |size = (|fake256/|
|00002d40| 72 65 73 29 2b 31 0d 09 | 09 44 49 56 53 2e 57 09 |res)+1..|.DIVS.W.|
|00002d50| 72 65 73 2c 44 30 09 09 | 09 09 09 09 3b 0d 09 09 |res,D0..|....;...|
|00002d60| 41 44 44 51 2e 57 09 23 | 31 2c 44 30 09 09 09 09 |ADDQ.W.#|1,D0....|
|00002d70| 09 09 3b 0d 09 09 4d 4f | 56 45 2e 57 09 44 30 2c |..;...MO|VE.W.D0,|
|00002d80| 68 73 69 7a 65 28 41 36 | 29 09 09 09 09 3b 0d 09 |hsize(A6|)....;..|
|00002d90| 09 0d 09 09 4d 4f 56 45 | 2e 4c 09 66 61 6b 65 31 |....MOVE|.L.fake1|
|00002da0| 37 31 28 41 36 29 2c 44 | 30 09 09 09 09 3b 20 76 |71(A6),D|0....; v|
|00002db0| 73 69 7a 65 20 3d 20 28 | 66 61 6b 65 31 37 31 2f |size = (|fake171/|
|00002dc0| 72 65 73 29 2b 31 0d 09 | 09 44 49 56 53 2e 57 09 |res)+1..|.DIVS.W.|
|00002dd0| 72 65 73 2c 44 30 09 09 | 09 09 09 09 3b 0d 09 09 |res,D0..|....;...|
|00002de0| 41 44 44 51 2e 57 09 23 | 31 2c 44 30 09 09 09 09 |ADDQ.W.#|1,D0....|
|00002df0| 09 09 3b 0d 09 09 4d 4f | 56 45 2e 57 09 44 30 2c |..;...MO|VE.W.D0,|
|00002e00| 76 73 69 7a 65 28 41 36 | 29 09 09 09 09 3b 0d 09 |vsize(A6|)....;..|
|00002e10| 09 0d 09 09 46 4d 4f 56 | 45 43 52 2e 58 20 23 24 |....FMOV|ECR.X #$|
|00002e20| 33 34 2c 46 50 30 09 09 | 09 09 09 3b 20 72 65 61 |34,FP0..|...; rea|
|00002e30| 6c 31 30 30 20 3d 20 66 | 61 6b 65 31 30 30 0d 09 |l100 = f|ake100..|
|00002e40| 09 46 4d 4f 56 45 2e 58 | 09 46 50 30 2c 72 65 61 |.FMOVE.X|.FP0,rea|
|00002e50| 6c 31 30 30 28 41 36 29 | 09 09 09 09 3b 0d 09 09 |l100(A6)|....;...|
|00002e60| 0d 3b 09 09 09 09 09 09 | 09 09 09 09 09 3b 20 72 |.;......|.....; r|
|00002e70| 65 61 6c 32 20 3d 20 66 | 61 6b 65 32 0d 09 09 0d |eal2 = f|ake2....|
|00002e80| 3b 09 09 09 09 09 09 09 | 09 09 09 09 3b 20 72 65 |;.......|....; re|
|00002e90| 61 6c 6e 32 20 3d 20 2d | 66 61 6b 65 32 0d 09 09 |aln2 = -|fake2...|
|00002ea0| 0d 09 09 46 4d 4f 56 45 | 2e 58 09 72 65 61 6c 32 |...FMOVE|.X.real2|
|00002eb0| 2c 46 50 30 09 09 09 09 | 09 3b 20 72 61 74 20 3d |,FP0....|.; rat =|
|00002ec0| 20 72 65 61 6c 32 2f 68 | 73 69 7a 65 0d 09 09 46 | real2/h|size...F|
|00002ed0| 44 49 56 2e 57 09 68 73 | 69 7a 65 28 41 36 29 2c |DIV.W.hs|ize(A6),|
|00002ee0| 46 50 30 09 09 09 09 3b | 0d 09 09 46 4d 4f 56 45 |FP0....;|...FMOVE|
|00002ef0| 2e 58 09 46 50 30 2c 72 | 61 74 28 41 36 29 09 09 |.X.FP0,r|at(A6)..|
|00002f00| 09 09 09 3b 20 2f 2a 20 | 72 65 61 6c 73 20 69 6e |...; /* |reals in|
|00002f10| 74 65 72 6d 65 64 69 61 | 74 65 20 72 65 73 75 6c |termedia|te resul|
|00002f20| 74 20 62 65 63 61 75 73 | 65 20 6f 66 20 72 65 61 |t becaus|e of rea|
|00002f30| 6c 32 20 2a 2f 0d 09 09 | 0d 09 09 4d 4f 56 45 2e |l2 */...|...MOVE.|
|00002f40| 57 09 72 65 73 2c 44 30 | 09 09 09 09 09 09 3b 20 |W.res,D0|......; |
|00002f50| 72 62 61 73 65 68 20 3d | 20 32 35 36 2d 68 73 69 |rbaseh =| 256-hsi|
|00002f60| 7a 65 2a 72 65 73 0d 09 | 09 4d 55 4c 53 2e 57 09 |ze*res..|.MULS.W.|
|00002f70| 68 73 69 7a 65 28 41 36 | 29 2c 44 30 09 09 09 09 |hsize(A6|),D0....|
|00002f80| 3b 0d 09 09 4d 4f 56 45 | 2e 4c 09 66 61 6b 65 32 |;...MOVE|.L.fake2|
|00002f90| 35 36 28 41 36 29 2c 44 | 31 09 09 09 09 3b 0d 09 |56(A6),D|1....;..|
|00002fa0| 09 53 55 42 2e 57 09 44 | 30 2c 44 31 09 09 09 09 |.SUB.W.D|0,D1....|
|00002fb0| 09 09 3b 0d 09 09 4d 4f | 56 45 2e 57 09 44 31 2c |..;...MO|VE.W.D1,|
|00002fc0| 72 62 61 73 65 68 28 41 | 36 29 09 09 09 09 3b 0d |rbaseh(A|6)....;.|
|00002fd0| 09 09 0d 09 09 4d 4f 56 | 45 2e 57 09 72 65 73 2c |.....MOV|E.W.res,|
|00002fe0| 44 30 09 09 09 09 09 09 | 3b 20 72 2e 74 6f 70 20 |D0......|; r.top |
|00002ff0| 3d 20 31 37 31 2d 76 73 | 69 7a 65 2a 72 65 73 0d |= 171-vs|ize*res.|
|00003000| 09 09 4d 55 4c 53 2e 57 | 09 76 73 69 7a 65 28 41 |..MULS.W|.vsize(A|
|00003010| 36 29 2c 44 30 09 09 09 | 09 3b 0d 09 09 4d 4f 56 |6),D0...|.;...MOV|
|00003020| 45 2e 4c 09 66 61 6b 65 | 31 37 31 28 41 36 29 2c |E.L.fake|171(A6),|
|00003030| 44 31 09 09 09 09 3b 0d | 09 09 53 55 42 2e 57 09 |D1....;.|..SUB.W.|
|00003040| 44 30 2c 44 31 09 09 09 | 09 09 09 3b 0d 09 09 4d |D0,D1...|...;...M|
|00003050| 4f 56 45 2e 57 09 44 31 | 2c 72 28 41 36 29 09 09 |OVE.W.D1|,r(A6)..|
|00003060| 09 09 09 3b 0d 09 09 0d | 09 09 41 44 44 2e 57 09 |...;....|..ADD.W.|
|00003070| 72 65 73 2c 44 31 09 09 | 09 09 09 09 3b 20 72 2e |res,D1..|....; r.|
|00003080| 62 6f 74 74 6f 6d 20 3d | 20 72 2e 74 6f 70 20 2b |bottom =| r.top +|
|00003090| 20 72 65 73 0d 09 09 4d | 4f 56 45 2e 57 09 44 31 | res...M|OVE.W.D1|
|000030a0| 2c 72 2b 34 28 41 36 29 | 09 09 09 09 09 3b 0d 09 |,r+4(A6)|.....;..|
|000030b0| 09 0d 09 09 46 4d 4f 56 | 45 2e 4c 09 66 61 6b 65 |....FMOV|E.L.fake|
|000030c0| 31 37 31 28 41 36 29 2c | 46 50 32 09 09 09 09 3b |171(A6),|FP2....;|
|000030d0| 20 62 61 73 65 76 20 3d | 20 72 65 61 6c 6e 32 2a | basev =| realn2*|
|000030e0| 66 61 6b 65 31 37 31 2f | 66 61 6b 65 32 35 36 0d |fake171/|fake256.|
|000030f0| 09 09 46 4d 55 4c 2e 58 | 09 72 65 61 6c 6e 32 2c |..FMUL.X|.realn2,|
|00003100| 46 50 32 09 09 09 09 09 | 3b 20 2f 2a 20 63 65 6e |FP2.....|; /* cen|
|00003110| 74 65 72 20 69 74 20 2a | 2f 0d 09 09 46 44 49 56 |ter it *|/...FDIV|
|00003120| 2e 4c 09 66 61 6b 65 32 | 35 36 28 41 36 29 2c 46 |.L.fake2|56(A6),F|
|00003130| 50 32 09 09 09 09 3b 0d | 09 09 0d 09 09 46 4d 4f |P2....;.|.....FMO|
|00003140| 56 45 2e 58 09 73 65 65 | 64 76 28 41 36 29 2c 46 |VE.X.see|dv(A6),F|
|00003150| 50 30 09 09 09 09 3b 0d | 09 09 46 4d 4f 56 45 2e |P0....;.|..FMOVE.|
|00003160| 58 09 73 65 65 64 68 28 | 41 36 29 2c 46 50 31 09 |X.seedh(|A6),FP1.|
|00003170| 09 09 09 3b 0d 0d 3b 09 | 09 09 66 6f 72 20 6c 6f |...;..;.|..for lo|
|00003180| 6f 70 0d 09 09 0d 09 09 | 4d 4f 56 45 2e 57 09 76 |op......|MOVE.W.v|
|00003190| 73 69 7a 65 28 41 36 29 | 2c 44 34 09 09 09 09 3b |size(A6)|,D4....;|
|000031a0| 20 66 6f 72 20 28 69 3d | 2d 76 73 69 7a 65 3b 20 | for (i=|-vsize; |
|000031b0| 69 3c 76 73 69 7a 65 3b | 20 2b 2b 69 29 0d 09 09 |i<vsize;| ++i)...|
|000031c0| 4e 45 47 2e 57 09 44 34 | 09 09 09 09 09 09 09 3b |NEG.W.D4|.......;|
|000031d0| 0d 40 32 30 30 0d 3b 3b | 3b 09 09 43 4d 50 2e 57 |.@200.;;|;..CMP.W|
|000031e0| 09 76 73 69 7a 65 28 41 | 36 29 2c 44 34 09 09 09 |.vsize(A|6),D4...|
|000031f0| 09 3b 0d 09 09 43 4d 50 | 49 2e 57 09 23 30 2c 44 |.;...CMP|I.W.#0,D|
|00003200| 34 09 09 09 09 09 09 3b | 0d 09 09 42 47 45 09 09 |4......;|...BGE..|
|00003210| 40 35 30 32 09 09 09 09 | 09 09 3b 0d 09 09 0d 09 |@502....|..;.....|
|00003220| 09 4d 4f 56 45 2e 57 09 | 72 62 61 73 65 68 28 41 |.MOVE.W.|rbaseh(A|
|00003230| 36 29 2c 44 30 09 09 09 | 09 3b 20 72 2e 6c 65 66 |6),D0...|.; r.lef|
|00003240| 74 20 3d 20 72 62 61 73 | 65 68 0d 09 09 4d 4f 56 |t = rbas|eh...MOV|
|00003250| 45 2e 57 09 44 30 2c 72 | 2b 32 28 41 36 29 09 09 |E.W.D0,r|+2(A6)..|
|00003260| 09 09 09 3b 0d 09 09 0d | 09 09 41 44 44 2e 57 09 |...;....|..ADD.W.|
|00003270| 72 65 73 2c 44 30 09 09 | 09 09 09 09 3b 20 72 2e |res,D0..|....; r.|
|00003280| 72 69 67 68 74 20 3d 20 | 72 2e 6c 65 66 74 20 2b |right = |r.left +|
|00003290| 20 72 65 73 0d 09 09 4d | 4f 56 45 2e 57 09 44 30 | res...M|OVE.W.D0|
|000032a0| 2c 72 2b 36 28 41 36 29 | 09 09 09 09 09 3b 0d 09 |,r+6(A6)|.....;..|
|000032b0| 09 0d 09 09 43 4c 52 2e | 57 09 2d 28 53 50 29 09 |....CLR.|W.-(SP).|
|000032c0| 09 09 09 09 09 3b 20 63 | 68 65 63 6b 20 69 66 20 |.....; c|heck if |
|000032d0| 74 68 69 73 20 6c 69 6e | 65 20 69 73 20 76 69 73 |this lin|e is vis|
|000032e0| 69 62 6c 65 0d 09 09 4d | 4f 56 45 2e 4c 09 72 28 |ible...M|OVE.L.r(|
|000032f0| 41 36 29 2c 2d 28 53 50 | 29 09 09 09 09 09 3b 0d |A6),-(SP|).....;.|
|00003300| 09 09 4d 4f 56 45 2e 4c | 09 6f 75 72 57 69 6e 64 |..MOVE.L|.ourWind|
|00003310| 50 74 72 28 41 36 29 2c | 41 30 09 09 09 3b 0d 09 |Ptr(A6),|A0...;..|
|00003320| 09 4d 4f 56 45 2e 4c 09 | 63 6f 6e 74 52 67 6e 28 |.MOVE.L.|contRgn(|
|00003330| 41 30 29 2c 2d 28 53 50 | 29 09 09 09 3b 0d 09 09 |A0),-(SP|)...;...|
|00003340| 5f 50 74 49 6e 52 67 6e | 09 09 09 09 09 09 09 3b |_PtInRgn|.......;|
|00003350| 0d 09 09 54 53 54 2e 57 | 09 28 53 50 29 2b 09 09 |...TST.W|.(SP)+..|
|00003360| 09 09 09 09 3b 0d 09 09 | 42 4e 45 09 09 40 34 37 |....;...|BNE..@47|
|00003370| 30 09 09 09 09 09 09 3b | 0d 09 09 0d 09 09 46 4d |0......;|......FM|
|00003380| 4f 56 45 2e 58 09 72 65 | 61 6c 6e 32 2c 46 50 33 |OVE.X.re|aln2,FP3|
|00003390| 09 09 09 09 09 3b 20 62 | 61 73 65 68 20 3d 20 72 |.....; b|aseh = r|
|000033a0| 65 61 6c 6e 32 0d 09 09 | 0d 3b 09 09 09 66 6f 72 |ealn2...|.;...for|
|000033b0| 20 6c 6f 6f 70 0d 0d 09 | 09 4d 4f 56 45 2e 57 09 | loop...|.MOVE.W.|
|000033c0| 68 73 69 7a 65 28 41 36 | 29 2c 44 33 09 09 09 09 |hsize(A6|),D3....|
|000033d0| 3b 20 66 6f 72 20 28 6a | 3d 2d 68 73 69 7a 65 3b |; for (j|=-hsize;|
|000033e0| 20 6a 3c 68 73 69 7a 65 | 3b 20 2b 2b 6a 29 0d 09 | j<hsize|; ++j)..|
|000033f0| 09 4e 45 47 2e 57 09 44 | 33 09 09 09 09 09 09 09 |.NEG.W.D|3.......|
|00003400| 3b 0d 40 32 35 30 0d 09 | 09 43 4d 50 2e 57 09 68 |;.@250..|.CMP.W.h|
|00003410| 73 69 7a 65 28 41 36 29 | 2c 44 33 09 09 09 09 3b |size(A6)|,D3....;|
|00003420| 0d 09 09 42 47 54 09 09 | 40 34 35 30 09 09 09 09 |...BGT..|@450....|
|00003430| 09 09 3b 0d 09 09 0d 09 | 09 46 4d 4f 56 45 2e 58 |..;.....|.FMOVE.X|
|00003440| 09 46 50 33 2c 46 50 35 | 09 09 09 09 09 09 3b 20 |.FP3,FP5|......; |
|00003450| 76 61 6c 68 20 3d 20 62 | 61 73 65 68 0d 09 09 0d |valh = b|aseh....|
|00003460| 09 09 46 4d 4f 56 45 2e | 58 09 46 50 32 2c 46 50 |..FMOVE.|X.FP2,FP|
|00003470| 34 09 09 09 09 09 09 3b | 20 76 61 6c 76 20 3d 20 |4......;| valv = |
|00003480| 62 61 73 65 76 0d 09 09 | 0d 09 09 43 4c 52 2e 57 |basev...|...CLR.W|
|00003490| 09 44 35 09 09 09 09 09 | 09 09 3b 20 69 74 65 72 |.D5.....|..; iter|
|000034a0| 20 3d 20 30 0d 09 09 0d | 3b 09 09 09 64 6f 20 6c | = 0....|;...do l|
|000034b0| 6f 6f 70 0d 0d 40 33 30 | 30 0d 3b 0d 3b 0d 3b 09 |oop..@30|0.;.;.;.|
|000034c0| 72 65 67 69 73 74 65 72 | 20 61 73 73 69 67 6e 6d |register| assignm|
|000034d0| 65 6e 74 73 20 74 6f 20 | 73 70 65 65 64 20 75 70 |ents to |speed up|
|000034e0| 20 6c 6f 6f 70 0d 3b 0d | 3b 09 09 68 73 71 20 69 | loop.;.|;..hsq i|
|000034f0| 73 20 69 6e 20 46 50 37 | 0d 3b 09 09 76 73 71 20 |s in FP7|.;..vsq |
|00003500| 69 73 20 69 6e 20 46 50 | 36 0d 3b 09 09 76 61 6c |is in FP|6.;..val|
|00003510| 68 20 69 73 20 69 6e 20 | 46 50 35 0d 3b 09 09 76 |h is in |FP5.;..v|
|00003520| 61 6c 76 20 69 73 20 69 | 6e 20 46 50 34 0d 3b 09 |alv is i|n FP4.;.|
|00003530| 09 62 61 73 65 68 20 69 | 73 20 69 6e 20 46 50 33 |.baseh i|s in FP3|
|00003540| 0d 3b 09 09 62 61 73 65 | 76 20 69 73 20 69 6e 20 |.;..base|v is in |
|00003550| 46 50 32 0d 3b 09 09 73 | 65 65 64 68 20 69 73 20 |FP2.;..s|eedh is |
|00003560| 69 6e 20 46 50 31 0d 3b | 09 09 73 65 65 64 76 20 |in FP1.;|..seedv |
|00003570| 69 73 20 69 6e 20 46 50 | 30 0d 3b 0d 09 09 0d 09 |is in FP|0.;.....|
|00003580| 09 46 4d 4f 56 45 2e 58 | 09 46 50 34 2c 46 50 36 |.FMOVE.X|.FP4,FP6|
|00003590| 09 09 09 09 09 09 3b 20 | 76 73 71 20 3d 20 76 61 |......; |vsq = va|
|000035a0| 6c 76 20 2a 20 76 61 6c | 76 0d 09 09 46 4d 55 4c |lv * val|v...FMUL|
|000035b0| 2e 58 09 46 50 34 2c 46 | 50 36 09 09 09 09 09 09 |.X.FP4,F|P6......|
|000035c0| 3b 0d 09 09 0d 09 09 46 | 4d 55 4c 2e 58 09 46 50 |;......F|MUL.X.FP|
|000035d0| 35 2c 46 50 34 09 09 09 | 09 09 09 3b 20 76 61 6c |5,FP4...|...; val|
|000035e0| 76 20 3d 20 72 65 61 6c | 32 2a 76 61 6c 68 2a 76 |v = real|2*valh*v|
|000035f0| 61 6c 76 20 2b 20 73 65 | 65 64 76 0d 09 09 46 41 |alv + se|edv...FA|
|00003600| 44 44 2e 58 09 46 50 34 | 2c 46 50 34 09 09 09 09 |DD.X.FP4|,FP4....|
|00003610| 09 09 3b 0d 09 09 46 41 | 44 44 2e 58 09 46 50 30 |..;...FA|DD.X.FP0|
|00003620| 2c 46 50 34 09 09 09 09 | 09 09 3b 0d 09 09 0d 09 |,FP4....|..;.....|
|00003630| 09 46 4d 55 4c 2e 58 09 | 46 50 35 2c 46 50 35 09 |.FMUL.X.|FP5,FP5.|
|00003640| 09 09 09 09 09 3b 20 68 | 73 71 20 3d 20 76 61 6c |.....; h|sq = val|
|00003650| 68 20 2a 20 76 61 6c 68 | 0d 09 09 46 4d 4f 56 45 |h * valh|...FMOVE|
|00003660| 2e 58 09 46 50 35 2c 46 | 50 37 09 09 09 09 09 09 |.X.FP5,F|P7......|
|00003670| 3b 0d 09 09 0d 09 09 46 | 53 55 42 2e 58 09 46 50 |;......F|SUB.X.FP|
|00003680| 36 2c 46 50 35 09 09 09 | 09 09 09 3b 20 76 61 6c |6,FP5...|...; val|
|00003690| 68 20 3d 20 68 73 71 20 | 2d 20 76 73 71 20 2b 20 |h = hsq |- vsq + |
|000036a0| 73 65 65 64 68 0d 09 09 | 46 41 44 44 2e 58 09 46 |seedh...|FADD.X.F|
|000036b0| 50 31 2c 46 50 35 09 09 | 09 09 09 09 3b 0d 09 09 |P1,FP5..|....;...|
|000036c0| 0d 09 09 41 44 44 51 2e | 57 09 23 31 2c 44 35 09 |...ADDQ.|W.#1,D5.|
|000036d0| 09 09 09 09 09 3b 20 2b | 2b 69 74 65 72 0d 09 09 |.....; +|+iter...|
|000036e0| 0d 09 09 46 41 44 44 2e | 58 09 46 50 36 2c 46 50 |...FADD.|X.FP6,FP|
|000036f0| 37 09 09 09 09 09 09 3b | 20 77 68 69 6c 65 20 28 |7......;| while (|
|00003700| 28 68 73 71 2b 76 73 71 | 3c 72 65 61 6c 31 30 30 |(hsq+vsq|<real100|
|00003710| 29 20 26 26 20 28 69 74 | 65 72 3c 6c 69 6d 69 74 |) && (it|er<limit|
|00003720| 29 29 0d 09 09 46 4d 4f | 56 45 2e 58 09 73 43 6f |))...FMO|VE.X.sCo|
|00003730| 6e 73 2c 46 50 36 09 09 | 09 09 09 3b 20 3c 3c 3c |ns,FP6..|...; <<<|
|00003740| 3c 3c 20 74 68 69 73 20 | 6f 6e 65 20 62 72 69 6e |<< this |one brin|
|00003750| 67 73 20 69 6e 20 61 20 | 63 6f 6e 73 74 61 6e 74 |gs in a |constant|
|00003760| 20 66 72 6f 6d 20 36 38 | 30 32 30 0d 3b 3b 3b 09 | from 68|020.;;;.|
|00003770| 09 46 4d 4f 56 45 43 52 | 2e 58 20 23 24 33 34 2c |.FMOVECR|.X #$34,|
|00003780| 46 50 36 09 09 09 09 09 | 3b 20 3c 3c 3c 3c 3c 20 |FP6.....|; <<<<< |
|00003790| 74 68 69 73 20 6f 6e 65 | 20 75 73 65 73 20 58 27 |this one| uses X'|
|000037a0| 31 30 30 2e 30 27 20 66 | 72 6f 6d 20 36 38 38 38 |100.0' f|rom 6888|
|000037b0| 31 20 52 4f 4d 0d 09 09 | 46 43 4d 50 2e 58 09 46 |1 ROM...|FCMP.X.F|
|000037c0| 50 37 2c 46 50 36 09 09 | 09 09 09 09 3b 0d 09 09 |P7,FP6..|....;...|
|000037d0| 46 42 4c 45 2e 57 09 40 | 33 35 30 09 09 09 09 09 |FBLE.W.@|350.....|
|000037e0| 09 3b 0d 09 09 43 4d 50 | 2e 57 09 6c 69 6d 69 74 |.;...CMP|.W.limit|
|000037f0| 28 41 36 29 2c 44 35 09 | 09 09 09 3b 0d 09 09 42 |(A6),D5.|...;...B|
|00003800| 4c 45 09 09 40 33 30 30 | 09 09 09 09 09 09 3b 0d |LE..@300|......;.|
|00003810| 0d 40 33 35 30 0d 09 09 | 46 41 44 44 2e 58 09 72 |.@350...|FADD.X.r|
|00003820| 61 74 28 41 36 29 2c 46 | 50 33 09 09 09 09 09 3b |at(A6),F|P3.....;|
|00003830| 20 62 61 73 65 68 20 2b | 3d 20 72 61 74 0d 09 09 | baseh +|= rat...|
|00003840| 0d 09 09 4d 4f 56 45 2e | 57 09 72 2b 32 28 41 36 |...MOVE.|W.r+2(A6|
|00003850| 29 2c 44 32 09 09 09 09 | 09 3b 20 67 65 74 20 6c |),D2....|.; get l|
|00003860| 65 66 74 20 70 69 78 65 | 6c 20 23 0d 09 09 53 55 |eft pixe|l #...SU|
|00003870| 42 2e 57 09 72 62 61 73 | 65 68 28 41 36 29 2c 44 |B.W.rbas|eh(A6),D|
|00003880| 32 09 09 09 09 3b 20 6d | 61 6b 65 20 72 65 6c 20 |2....; m|ake rel |
|00003890| 74 6f 20 7a 65 72 6f 0d | 09 09 41 4e 44 49 2e 57 |to zero.|..ANDI.W|
|000038a0| 09 23 2d 38 2c 44 32 09 | 09 09 09 09 09 3b 20 67 |.#-8,D2.|.....; g|
|000038b0| 6f 74 20 6c 6f 6e 67 20 | 77 6f 72 64 20 23 0d 09 |ot long |word #..|
|000038c0| 09 4c 53 52 2e 57 09 23 | 31 2c 44 32 09 09 09 09 |.LSR.W.#|1,D2....|
|000038d0| 09 09 3b 20 64 69 76 69 | 64 65 20 62 79 20 32 20 |..; divi|de by 2 |
|000038e0| 28 20 67 65 74 27 73 20 | 64 69 73 70 6c 29 0d 09 |( get's |displ)..|
|000038f0| 09 4c 45 41 2e 4c 09 74 | 65 6d 70 42 69 67 28 41 |.LEA.L.t|empBig(A|
|00003900| 36 29 2c 41 31 09 09 09 | 09 3b 20 67 65 74 20 62 |6),A1...|.; get b|
|00003910| 61 73 65 0d 09 09 41 44 | 44 41 2e 57 09 44 32 2c |ase...AD|DA.W.D2,|
|00003920| 41 31 09 09 09 09 09 09 | 3b 20 70 74 20 74 6f 20 |A1......|; pt to |
|00003930| 6c 69 6e 65 0d 0d 09 09 | 41 4e 44 49 2e 4c 09 23 |line....|ANDI.L.#|
|00003940| 31 35 2c 44 35 09 09 09 | 09 09 09 3b 0d 0d 09 09 |15,D5...|...;....|
|00003950| 4d 4f 56 45 2e 57 09 72 | 2b 32 28 41 36 29 2c 44 |MOVE.W.r|+2(A6),D|
|00003960| 30 09 09 09 09 09 3b 20 | 67 65 74 20 6c 65 66 74 |0.....; |get left|
|00003970| 20 70 69 78 65 6c 20 23 | 0d 09 09 53 55 42 2e 57 | pixel #|...SUB.W|
|00003980| 09 72 62 61 73 65 68 28 | 41 36 29 2c 44 30 09 09 |.rbaseh(|A6),D0..|
|00003990| 09 09 3b 20 6d 61 6b 65 | 20 72 65 6c 20 74 6f 20 |..; make| rel to |
|000039a0| 7a 65 72 6f 0d 09 09 4d | 4f 56 45 51 2e 4c 09 23 |zero...M|OVEQ.L.#|
|000039b0| 37 2c 44 32 09 09 09 09 | 09 09 3b 0d 09 09 41 4e |7,D2....|..;...AN|
|000039c0| 44 2e 57 09 44 32 2c 44 | 30 09 09 09 09 09 09 3b |D.W.D2,D|0......;|
|000039d0| 20 74 61 6b 65 20 6d 6f | 64 20 34 0d 09 09 42 4e | take mo|d 4...BN|
|000039e0| 45 2e 53 09 40 34 34 37 | 09 09 09 09 09 09 3b 20 |E.S.@447|......; |
|000039f0| 6e 6f 0d 09 09 43 4c 52 | 2e 4c 09 28 41 31 29 09 |no...CLR|.L.(A1).|
|00003a00| 09 09 09 09 09 3b 20 63 | 6c 65 61 72 20 74 68 65 |.....; c|lear the|
|00003a10| 20 77 6f 72 64 0d 40 34 | 34 37 0d 09 09 53 55 42 | word.@4|47...SUB|
|00003a20| 2e 57 09 44 30 2c 44 32 | 09 09 09 09 09 09 3b 0d |.W.D0,D2|......;.|
|00003a30| 09 09 43 4c 52 2e 4c 09 | 44 30 09 09 09 09 09 09 |..CLR.L.|D0......|
|00003a40| 09 3b 0d 09 09 4c 53 4c | 2e 57 09 23 32 2c 44 32 |.;...LSL|.W.#2,D2|
|00003a50| 09 09 09 09 09 09 3b 20 | 6d 75 6c 74 20 62 79 20 |......; |mult by |
|00003a60| 34 0d 09 09 4c 53 4c 2e | 4c 09 44 32 2c 44 35 0d |4...LSL.|L.D2,D5.|
|00003a70| 09 09 4f 52 2e 4c 09 44 | 35 2c 28 41 31 29 09 09 |..OR.L.D|5,(A1)..|
|00003a80| 09 09 09 09 3b 20 73 65 | 74 20 70 69 78 65 6c 20 |....; se|t pixel |
|00003a90| 72 65 6c 61 74 69 76 65 | 20 76 61 6c 75 65 0d 0d |relative| value..|
|00003aa0| 09 09 4d 4f 56 45 2e 57 | 09 72 65 73 2c 44 30 09 |..MOVE.W|.res,D0.|
|00003ab0| 09 09 09 09 09 3b 20 72 | 2e 6c 65 66 74 20 2b 3d |.....; r|.left +=|
|00003ac0| 20 72 65 73 0d 09 09 41 | 44 44 2e 57 09 44 30 2c | res...A|DD.W.D0,|
|00003ad0| 72 2b 32 28 41 36 29 09 | 09 09 09 09 3b 0d 09 09 |r+2(A6).|....;...|
|00003ae0| 0d 09 09 41 44 44 2e 57 | 09 44 30 2c 72 2b 36 28 |...ADD.W|.D0,r+6(|
|00003af0| 41 36 29 09 09 09 09 09 | 3b 20 72 2e 72 69 67 68 |A6).....|; r.righ|
|00003b00| 74 20 2b 3d 20 72 65 73 | 0d 09 09 0d 09 09 41 44 |t += res|......AD|
|00003b10| 44 51 2e 57 09 23 31 2c | 44 33 09 09 09 09 09 09 |DQ.W.#1,|D3......|
|00003b20| 3b 0d 09 09 42 52 41 09 | 09 40 32 35 30 09 09 09 |;...BRA.|.@250...|
|00003b30| 09 09 09 3b 0d 0d 40 34 | 35 30 0d 3b 3b 3b 09 09 |...;..@4|50.;;;..|
|00003b40| 5f 44 65 62 75 67 67 65 | 72 0d 09 09 46 41 44 44 |_Debugge|r...FADD|
|00003b50| 2e 58 09 72 61 74 28 41 | 36 29 2c 46 50 32 09 09 |.X.rat(A|6),FP2..|
|00003b60| 09 09 09 3b 20 62 61 73 | 65 76 20 2b 3d 20 72 61 |...; bas|ev += ra|
|00003b70| 74 0d 0d 09 09 4d 4f 56 | 45 2e 4c 09 6f 75 72 50 |t....MOV|E.L.ourP|
|00003b80| 69 78 4d 61 70 28 41 36 | 29 2c 41 32 09 09 09 3b |ixMap(A6|),A2...;|
|00003b90| 20 67 65 74 20 70 69 78 | 4d 61 70 20 68 61 6e 64 | get pix|Map hand|
|00003ba0| 6c 65 0d 09 09 4d 4f 56 | 45 2e 4c 09 28 41 32 29 |le...MOV|E.L.(A2)|
|00003bb0| 2c 41 32 09 09 09 09 09 | 09 3b 20 64 65 2d 72 65 |,A2.....|.; de-re|
|00003bc0| 66 20 69 74 0d 09 09 4c | 45 41 2e 4c 09 74 65 6d |f it...L|EA.L.tem|
|00003bd0| 70 42 69 67 28 41 36 29 | 2c 41 30 09 09 09 09 3b |pBig(A6)|,A0....;|
|00003be0| 20 70 74 20 74 6f 20 62 | 69 74 20 61 72 65 61 0d | pt to b|it area.|
|00003bf0| 09 09 4d 4f 56 45 2e 4c | 09 41 30 2c 70 6d 42 61 |..MOVE.L|.A0,pmBa|
|00003c00| 73 65 41 64 64 72 28 41 | 32 29 09 09 09 3b 20 73 |seAddr(A|2)...; s|
|00003c10| 65 74 20 69 74 0d 09 09 | 4d 4f 56 45 2e 57 09 23 |et it...|MOVE.W.#|
|00003c20| 35 31 32 2c 70 6d 52 6f | 77 42 79 74 65 73 28 41 |512,pmRo|wBytes(A|
|00003c30| 32 29 09 09 09 3b 20 73 | 65 74 20 72 6f 77 42 79 |2)...; s|et rowBy|
|00003c40| 74 65 73 0d 09 09 4f 52 | 49 2e 42 09 23 24 38 30 |tes...OR|I.B.#$80|
|00003c50| 2c 70 6d 4e 65 77 46 6c | 61 67 28 41 32 29 09 09 |,pmNewFl|ag(A2)..|
|00003c60| 09 3b 20 69 6e 64 69 63 | 61 74 65 20 6e 65 77 20 |.; indic|ate new |
|00003c70| 70 69 78 20 6d 61 70 0d | 09 09 4d 4f 56 45 2e 57 |pix map.|..MOVE.W|
|00003c80| 09 23 34 2c 70 6d 50 69 | 78 65 6c 53 69 7a 65 28 |.#4,pmPi|xelSize(|
|00003c90| 41 32 29 09 09 09 3b 20 | 73 65 74 20 62 69 74 73 |A2)...; |set bits|
|00003ca0| 20 70 65 72 20 70 69 78 | 65 6c 0d 09 09 4d 4f 56 | per pix|el...MOV|
|00003cb0| 45 2e 57 09 23 34 2c 70 | 6d 43 6d 70 53 69 7a 65 |E.W.#4,p|mCmpSize|
|00003cc0| 28 41 32 29 09 09 09 3b | 20 73 65 74 20 62 69 74 |(A2)...;| set bit|
|00003cd0| 73 20 70 65 72 20 70 69 | 78 65 6c 0d 0d 09 09 4d |s per pi|xel....M|
|00003ce0| 4f 56 45 2e 57 09 23 30 | 2c 64 73 74 52 2b 32 28 |OVE.W.#0|,dstR+2(|
|00003cf0| 41 36 29 09 09 09 09 3b | 20 73 65 74 20 6c 65 66 |A6)....;| set lef|
|00003d00| 74 0d 09 09 4d 4f 56 45 | 2e 57 09 62 52 65 63 74 |t...MOVE|.W.bRect|
|00003d10| 2b 36 2c 44 30 09 09 09 | 09 09 3b 20 67 65 74 20 |+6,D0...|..; get |
|00003d20| 72 69 67 68 74 0d 09 09 | 53 55 42 2e 57 09 62 52 |right...|SUB.W.bR|
|00003d30| 65 63 74 2b 32 2c 44 30 | 09 09 09 09 09 3b 20 66 |ect+2,D0|.....; f|
|00003d40| 69 6e 64 20 64 69 66 66 | 0d 09 09 4d 4f 56 45 2e |ind diff|...MOVE.|
|00003d50| 57 09 44 30 2c 64 73 74 | 52 2b 36 28 41 36 29 09 |W.D0,dst|R+6(A6).|
|00003d60| 09 09 09 3b 20 73 65 74 | 20 72 69 67 68 74 0d 09 |...; set| right..|
|00003d70| 09 4d 4f 56 45 2e 57 09 | 72 28 41 36 29 2c 44 30 |.MOVE.W.|r(A6),D0|
|00003d80| 09 09 09 09 09 3b 20 67 | 65 74 20 74 6f 70 0d 09 |.....; g|et top..|
|00003d90| 09 4d 4f 56 45 2e 57 09 | 44 30 2c 64 73 74 52 28 |.MOVE.W.|D0,dstR(|
|00003da0| 41 36 29 09 09 09 09 09 | 3b 20 73 65 74 20 74 6f |A6).....|; set to|
|00003db0| 70 0d 09 09 41 44 44 2e | 57 09 23 31 2c 44 30 09 |p...ADD.|W.#1,D0.|
|00003dc0| 09 09 09 09 09 3b 0d 09 | 09 4d 4f 56 45 2e 57 09 |.....;..|.MOVE.W.|
|00003dd0| 44 30 2c 64 73 74 52 2b | 34 28 41 36 29 09 09 09 |D0,dstR+|4(A6)...|
|00003de0| 09 3b 20 73 65 74 20 62 | 6f 74 74 6f 6d 0d 0d 09 |.; set b|ottom...|
|00003df0| 09 4d 4f 56 45 2e 4c 09 | 64 73 74 52 28 41 36 29 |.MOVE.L.|dstR(A6)|
|00003e00| 2c 70 6d 42 6f 75 6e 64 | 73 28 41 32 29 09 09 3b |,pmBound|s(A2)..;|
|00003e10| 0d 09 09 4d 4f 56 45 2e | 4c 09 64 73 74 52 2b 34 |...MOVE.|L.dstR+4|
|00003e20| 28 41 36 29 2c 70 6d 42 | 6f 75 6e 64 73 2b 34 28 |(A6),pmB|ounds+4(|
|00003e30| 41 32 29 09 3b 0d 0d 09 | 09 4d 4f 56 45 2e 4c 09 |A2).;...|.MOVE.L.|
|00003e40| 6f 75 72 50 69 78 4d 61 | 70 28 41 36 29 2c 41 30 |ourPixMa|p(A6),A0|
|00003e50| 09 09 09 3b 0d 09 09 4d | 4f 56 45 2e 4c 09 28 41 |...;...M|OVE.L.(A|
|00003e60| 30 29 2c 2d 28 53 50 29 | 09 09 09 09 09 3b 0d 09 |0),-(SP)|.....;..|
|00003e70| 09 4d 4f 56 45 2e 4c 09 | 6f 75 72 57 69 6e 64 50 |.MOVE.L.|ourWindP|
|00003e80| 74 72 28 41 36 29 2c 41 | 30 09 09 09 3b 20 67 65 |tr(A6),A|0...; ge|
|00003e90| 74 20 70 74 72 20 74 6f | 20 70 6f 72 74 0d 09 09 |t ptr to| port...|
|00003ea0| 4d 4f 56 45 2e 4c 09 70 | 6f 72 74 50 69 78 4d 61 |MOVE.L.p|ortPixMa|
|00003eb0| 70 28 41 30 29 2c 41 30 | 09 09 09 3b 20 64 65 73 |p(A0),A0|...; des|
|00003ec0| 74 20 62 69 74 6d 61 70 | 0d 09 09 4d 4f 56 45 2e |t bitmap|...MOVE.|
|00003ed0| 4c 09 28 41 30 29 2c 2d | 28 53 50 29 09 09 09 09 |L.(A0),-|(SP)....|
|00003ee0| 09 3b 0d 09 09 50 45 41 | 2e 4c 09 64 73 74 52 28 |.;...PEA|.L.dstR(|
|00003ef0| 41 36 29 09 09 09 09 09 | 3b 0d 09 09 50 45 41 2e |A6).....|;...PEA.|
|00003f00| 4c 09 64 73 74 52 28 41 | 36 29 09 09 09 09 09 3b |L.dstR(A|6).....;|
|00003f10| 0d 09 09 4d 4f 56 45 2e | 57 09 23 73 72 63 43 6f |...MOVE.|W.#srcCo|
|00003f20| 70 79 2c 2d 28 53 50 29 | 09 09 09 09 3b 0d 09 09 |py,-(SP)|....;...|
|00003f30| 43 4c 52 2e 4c 09 2d 28 | 53 50 29 09 09 09 09 09 |CLR.L.-(|SP).....|
|00003f40| 09 3b 0d 09 09 5f 43 6f | 70 79 42 69 74 73 0d 40 |.;..._Co|pyBits.@|
|00003f50| 34 36 30 0d 09 09 43 4c | 52 2e 4c 09 44 36 09 09 |460...CL|R.L.D6..|
|00003f60| 09 09 09 09 09 3b 0d 09 | 09 4d 4f 56 45 2e 57 09 |.....;..|.MOVE.W.|
|00003f70| 62 52 65 63 74 2b 36 2c | 44 36 09 09 09 09 09 3b |bRect+6,|D6.....;|
|00003f80| 20 67 65 74 20 72 69 67 | 68 74 0d 09 09 53 55 42 | get rig|ht...SUB|
|00003f90| 2e 57 09 62 52 65 63 74 | 2b 32 2c 44 36 09 09 09 |.W.bRect|+2,D6...|
|00003fa0| 09 09 3b 20 66 69 6e 64 | 20 64 69 66 66 0d 09 09 |..; find| diff...|
|00003fb0| 41 44 44 51 2e 4c 09 23 | 32 2c 44 36 09 09 09 09 |ADDQ.L.#|2,D6....|
|00003fc0| 09 09 3b 0d 09 09 43 4c | 52 2e 4c 09 44 37 09 09 |..;...CL|R.L.D7..|
|00003fd0| 09 09 09 09 09 3b 0d 09 | 09 4d 4f 56 45 2e 4c 09 |.....;..|.MOVE.L.|
|00003fe0| 44 36 2c 44 30 09 09 09 | 09 09 09 3b 0d 09 09 41 |D6,D0...|...;...A|
|00003ff0| 4e 44 49 2e 4c 09 23 2d | 38 2c 44 30 09 09 09 09 |NDI.L.#-|8,D0....|
|00004000| 09 09 3b 0d 09 09 4c 53 | 52 2e 4c 09 23 31 2c 44 |..;...LS|R.L.#1,D|
|00004010| 30 09 09 09 09 09 09 3b | 0d 09 09 4c 45 41 2e 4c |0......;|...LEA.L|
|00004020| 09 74 65 6d 70 42 69 67 | 32 28 41 36 29 2c 41 30 |.tempBig|2(A6),A0|
|00004030| 09 09 09 09 3b 0d 09 09 | 41 44 44 41 2e 4c 09 44 |....;...|ADDA.L.D|
|00004040| 30 2c 41 30 09 09 09 09 | 09 09 3b 20 70 74 20 74 |0,A0....|..; pt t|
|00004050| 6f 20 72 65 63 76 20 77 | 6f 72 64 0d 09 09 43 4c |o recv w|ord...CL|
|00004060| 52 2e 4c 09 28 41 30 29 | 09 09 09 09 09 09 3b 0d |R.L.(A0)|......;.|
|00004070| 40 34 36 32 09 09 09 09 | 09 09 09 09 09 09 3b 0d |@462....|......;.|
|00004080| 09 09 4c 45 41 2e 4c 09 | 74 65 6d 70 42 69 67 28 |..LEA.L.|tempBig(|
|00004090| 41 36 29 2c 41 30 09 09 | 09 09 3b 0d 09 09 4d 4f |A6),A0..|..;...MO|
|000040a0| 56 45 2e 4c 09 44 37 2c | 44 30 09 09 09 09 09 09 |VE.L.D7,|D0......|
|000040b0| 3b 0d 09 09 41 4e 44 49 | 2e 4c 09 23 2d 38 2c 44 |;...ANDI|.L.#-8,D|
|000040c0| 30 09 09 09 09 09 09 3b | 0d 09 09 4c 53 52 2e 4c |0......;|...LSR.L|
|000040d0| 09 23 31 2c 44 30 09 09 | 09 09 09 09 3b 0d 09 09 |.#1,D0..|....;...|
|000040e0| 41 44 44 41 2e 4c 09 44 | 30 2c 41 30 09 09 09 09 |ADDA.L.D|0,A0....|
|000040f0| 09 09 3b 0d 09 09 4d 4f | 56 45 2e 4c 09 44 37 2c |..;...MO|VE.L.D7,|
|00004100| 44 30 09 09 09 09 09 09 | 3b 0d 09 09 41 4e 44 49 |D0......|;...ANDI|
|00004110| 2e 4c 09 23 37 2c 44 30 | 09 09 09 09 09 09 3b 0d |.L.#7,D0|......;.|
|00004120| 09 09 4c 53 4c 2e 4c 09 | 23 32 2c 44 30 09 09 09 |..LSL.L.|#2,D0...|
|00004130| 09 09 09 3b 0d 09 09 4d | 4f 56 45 2e 4c 09 28 41 |...;...M|OVE.L.(A|
|00004140| 30 29 2c 44 31 09 09 09 | 09 09 09 3b 0d 09 09 4c |0),D1...|...;...L|
|00004150| 53 4c 2e 4c 09 44 30 2c | 44 31 09 09 09 09 09 09 |SL.L.D0,|D1......|
|00004160| 3b 0d 09 09 41 4e 44 49 | 2e 4c 09 23 24 46 30 30 |;...ANDI|.L.#$F00|
|00004170| 30 30 30 30 30 2c 44 31 | 09 09 09 09 3b 20 73 61 |00000,D1|....; sa|
|00004180| 76 65 20 6f 75 72 20 6e | 69 62 6c 65 0d 09 09 4d |ve our n|ible...M|
|00004190| 4f 56 45 2e 4c 09 44 36 | 2c 44 30 09 09 09 09 09 |OVE.L.D6|,D0.....|
|000041a0| 09 3b 0d 09 09 53 55 42 | 2e 4c 09 44 37 2c 44 30 |.;...SUB|.L.D7,D0|
|000041b0| 09 09 09 09 09 09 3b 0d | 09 09 4d 4f 56 45 2e 4c |......;.|..MOVE.L|
|000041c0| 09 44 30 2c 44 32 09 09 | 09 09 09 09 3b 20 6d 61 |.D0,D2..|....; ma|
|000041d0| 6b 65 20 61 20 63 6f 70 | 79 0d 09 09 41 4e 44 49 |ke a cop|y...ANDI|
|000041e0| 2e 4c 09 23 2d 38 2c 44 | 30 09 09 09 09 09 09 3b |.L.#-8,D|0......;|
|000041f0| 0d 09 09 4c 53 52 2e 4c | 09 23 31 2c 44 30 09 09 |...LSR.L|.#1,D0..|
|00004200| 09 09 09 09 3b 0d 09 09 | 4c 45 41 2e 4c 09 74 65 |....;...|LEA.L.te|
|00004210| 6d 70 42 69 67 32 28 41 | 36 29 2c 41 30 09 09 09 |mpBig2(A|6),A0...|
|00004220| 09 3b 0d 09 09 41 44 44 | 41 2e 4c 09 44 30 2c 41 |.;...ADD|A.L.D0,A|
|00004230| 30 09 09 09 09 09 09 3b | 20 70 74 20 74 6f 20 72 |0......;| pt to r|
|00004240| 65 63 76 20 77 6f 72 64 | 0d 09 09 41 4e 44 49 2e |ecv word|...ANDI.|
|00004250| 4c 09 23 37 2c 44 32 09 | 09 09 09 09 09 3b 0d 09 |L.#7,D2.|.....;..|
|00004260| 09 43 4d 50 49 2e 4c 09 | 23 37 2c 44 32 09 09 09 |.CMPI.L.|#7,D2...|
|00004270| 09 09 09 3b 0d 09 09 42 | 4e 45 2e 53 09 40 34 36 |...;...B|NE.S.@46|
|00004280| 34 09 09 09 09 09 09 3b | 0d 09 09 43 4c 52 2e 4c |4......;|...CLR.L|
|00004290| 09 28 41 30 29 09 09 09 | 09 09 09 3b 0d 40 34 36 |.(A0)...|...;.@46|
|000042a0| 34 09 09 09 09 09 09 09 | 09 09 09 3b 0d 09 09 4c |4.......|...;...L|
|000042b0| 53 4c 2e 4c 09 23 32 2c | 44 32 09 09 09 09 09 09 |SL.L.#2,|D2......|
|000042c0| 3b 0d 09 09 4c 53 52 2e | 4c 09 44 32 2c 44 31 09 |;...LSR.|L.D2,D1.|
|000042d0| 09 09 09 09 09 3b 0d 09 | 09 4f 52 2e 4c 09 44 31 |.....;..|.OR.L.D1|
|000042e0| 2c 28 41 30 29 09 09 09 | 09 09 09 3b 0d 09 09 43 |,(A0)...|...;...C|
|000042f0| 4d 50 2e 57 09 44 36 2c | 44 37 09 09 09 09 09 09 |MP.W.D6,|D7......|
|00004300| 3b 0d 09 09 42 47 54 2e | 53 09 40 34 36 36 09 09 |;...BGT.|S.@466..|
|00004310| 09 09 09 09 3b 0d 09 09 | 41 44 44 51 2e 4c 09 23 |....;...|ADDQ.L.#|
|00004320| 31 2c 44 37 09 09 09 09 | 09 09 3b 0d 09 09 42 52 |1,D7....|..;...BR|
|00004330| 41 09 09 40 34 36 32 09 | 09 09 09 09 09 3b 0d 40 |A..@462.|.....;.@|
|00004340| 34 36 36 0d 09 09 4d 4f | 56 45 2e 4c 09 6f 75 72 |466...MO|VE.L.our|
|00004350| 50 69 78 4d 61 70 28 41 | 36 29 2c 41 32 09 09 09 |PixMap(A|6),A2...|
|00004360| 3b 20 67 65 74 20 70 69 | 78 4d 61 70 20 68 61 6e |; get pi|xMap han|
|00004370| 64 6c 65 0d 09 09 4d 4f | 56 45 2e 4c 09 28 41 32 |dle...MO|VE.L.(A2|
|00004380| 29 2c 41 32 09 09 09 09 | 09 09 3b 20 64 65 2d 72 |),A2....|..; de-r|
|00004390| 65 66 20 69 74 0d 09 09 | 4c 45 41 2e 4c 09 74 65 |ef it...|LEA.L.te|
|000043a0| 6d 70 42 69 67 32 28 41 | 36 29 2c 41 30 09 09 09 |mpBig2(A|6),A0...|
|000043b0| 09 3b 20 70 74 20 74 6f | 20 62 69 74 20 61 72 65 |.; pt to| bit are|
|000043c0| 61 0d 09 09 4d 4f 56 45 | 2e 4c 09 41 30 2c 70 6d |a...MOVE|.L.A0,pm|
|000043d0| 42 61 73 65 41 64 64 72 | 28 41 32 29 09 09 09 3b |BaseAddr|(A2)...;|
|000043e0| 20 73 65 74 20 69 74 0d | 0d 09 09 4d 4f 56 45 2e | set it.|...MOVE.|
|000043f0| 57 09 62 52 65 63 74 2b | 34 2c 44 31 09 09 09 09 |W.bRect+|4,D1....|
|00004400| 09 3b 20 67 65 74 20 62 | 6f 74 74 6f 6d 0d 09 09 |.; get b|ottom...|
|00004410| 53 55 42 2e 57 09 62 52 | 65 63 74 2c 44 31 09 09 |SUB.W.bR|ect,D1..|
|00004420| 09 09 09 3b 20 66 69 6e | 64 20 64 69 66 66 0d 09 |...; fin|d diff..|
|00004430| 09 53 55 42 2e 57 09 72 | 28 41 36 29 2c 44 31 09 |.SUB.W.r|(A6),D1.|
|00004440| 09 09 09 09 3b 20 67 65 | 74 20 74 6f 70 0d 09 09 |....; ge|t top...|
|00004450| 4d 4f 56 45 2e 57 09 44 | 31 2c 64 73 74 52 28 41 |MOVE.W.D|1,dstR(A|
|00004460| 36 29 09 09 09 09 09 3b | 20 73 65 74 20 74 6f 70 |6).....;| set top|
|00004470| 0d 09 09 41 44 44 2e 57 | 09 23 31 2c 44 31 09 09 |...ADD.W|.#1,D1..|
|00004480| 09 09 09 09 3b 0d 09 09 | 4d 4f 56 45 2e 57 09 44 |....;...|MOVE.W.D|
|00004490| 31 2c 64 73 74 52 2b 34 | 28 41 36 29 09 09 09 09 |1,dstR+4|(A6)....|
|000044a0| 3b 20 73 65 74 20 62 6f | 74 74 6f 6d 0d 0d 09 09 |; set bo|ttom....|
|000044b0| 4d 4f 56 45 2e 4c 09 64 | 73 74 52 28 41 36 29 2c |MOVE.L.d|stR(A6),|
|000044c0| 70 6d 42 6f 75 6e 64 73 | 28 41 32 29 09 09 3b 0d |pmBounds|(A2)..;.|
|000044d0| 09 09 4d 4f 56 45 2e 4c | 09 64 73 74 52 2b 34 28 |..MOVE.L|.dstR+4(|
|000044e0| 41 36 29 2c 70 6d 42 6f | 75 6e 64 73 2b 34 28 41 |A6),pmBo|unds+4(A|
|000044f0| 32 29 09 3b 0d 0d 09 09 | 4d 4f 56 45 2e 4c 09 6f |2).;....|MOVE.L.o|
|00004500| 75 72 50 69 78 4d 61 70 | 28 41 36 29 2c 41 30 09 |urPixMap|(A6),A0.|
|00004510| 09 09 3b 0d 09 09 4d 4f | 56 45 2e 4c 09 28 41 30 |..;...MO|VE.L.(A0|
|00004520| 29 2c 2d 28 53 50 29 09 | 09 09 09 09 3b 0d 09 09 |),-(SP).|....;...|
|00004530| 4d 4f 56 45 2e 4c 09 6f | 75 72 57 69 6e 64 50 74 |MOVE.L.o|urWindPt|
|00004540| 72 28 41 36 29 2c 41 30 | 09 09 09 3b 20 67 65 74 |r(A6),A0|...; get|
|00004550| 20 70 74 72 20 74 6f 20 | 70 6f 72 74 0d 09 09 4d | ptr to |port...M|
|00004560| 4f 56 45 2e 4c 09 70 6f | 72 74 50 69 78 4d 61 70 |OVE.L.po|rtPixMap|
|00004570| 28 41 30 29 2c 41 30 09 | 09 09 3b 20 64 65 73 74 |(A0),A0.|..; dest|
|00004580| 20 62 69 74 6d 61 70 0d | 09 09 4d 4f 56 45 2e 4c | bitmap.|..MOVE.L|
|00004590| 09 28 41 30 29 2c 2d 28 | 53 50 29 09 09 09 09 09 |.(A0),-(|SP).....|
|000045a0| 3b 0d 09 09 50 45 41 2e | 4c 09 64 73 74 52 28 41 |;...PEA.|L.dstR(A|
|000045b0| 36 29 09 09 09 09 09 3b | 0d 09 09 50 45 41 2e 4c |6).....;|...PEA.L|
|000045c0| 09 64 73 74 52 28 41 36 | 29 09 09 09 09 09 3b 0d |.dstR(A6|).....;.|
|000045d0| 09 09 4d 4f 56 45 2e 57 | 09 23 73 72 63 43 6f 70 |..MOVE.W|.#srcCop|
|000045e0| 79 2c 2d 28 53 50 29 09 | 09 09 09 3b 0d 09 09 43 |y,-(SP).|...;...C|
|000045f0| 4c 52 2e 4c 09 2d 28 53 | 50 29 09 09 09 09 09 09 |LR.L.-(S|P)......|
|00004600| 3b 0d 09 09 5f 43 6f 70 | 79 42 69 74 73 0d 09 09 |;..._Cop|yBits...|
|00004610| 0d 40 34 37 30 0d 09 09 | 4d 4f 56 45 2e 57 09 72 |.@470...|MOVE.W.r|
|00004620| 65 73 2c 44 30 09 09 09 | 09 09 09 3b 20 72 2e 74 |es,D0...|...; r.t|
|00004630| 6f 70 20 2b 3d 20 72 65 | 73 0d 09 09 41 44 44 2e |op += re|s...ADD.|
|00004640| 57 09 44 30 2c 72 28 41 | 36 29 09 09 09 09 09 3b |W.D0,r(A|6).....;|
|00004650| 0d 09 09 0d 09 09 41 44 | 44 2e 57 09 44 30 2c 72 |......AD|D.W.D0,r|
|00004660| 2b 34 28 41 36 29 09 09 | 09 09 09 3b 20 72 2e 62 |+4(A6)..|...; r.b|
|00004670| 6f 74 74 6f 6d 20 2b 3d | 20 72 65 73 0d 09 09 0d |ottom +=| res....|
|00004680| 09 09 53 55 42 51 2e 4c | 09 23 32 2c 53 50 09 09 |..SUBQ.L|.#2,SP..|
|00004690| 09 09 09 09 3b 20 72 65 | 73 75 6c 74 0d 09 09 4d |....; re|sult...M|
|000046a0| 4f 56 45 2e 57 09 23 24 | 32 61 2c 2d 28 53 50 29 |OVE.W.#$|2a,-(SP)|
|000046b0| 09 09 09 09 09 3b 20 65 | 76 65 6e 74 4d 61 73 6b |.....; e|ventMask|
|000046c0| 0d 09 09 50 45 41 2e 4c | 09 65 76 74 52 65 63 64 |...PEA.L|.evtRecd|
|000046d0| 28 41 36 29 09 09 09 09 | 09 3b 20 56 41 52 20 74 |(A6)....|.; VAR t|
|000046e0| 68 65 45 76 65 6e 74 0d | 09 09 5f 47 65 74 4e 65 |heEvent.|.._GetNe|
|000046f0| 78 74 45 76 65 6e 74 09 | 09 09 09 09 09 3b 0d 09 |xtEvent.|.....;..|
|00004700| 09 54 53 54 2e 42 09 28 | 53 50 29 2b 09 09 09 09 |.TST.B.(|SP)+....|
|00004710| 09 09 3b 20 61 6e 79 20 | 65 76 65 6e 74 20 3f 0d |..; any |event ?.|
|00004720| 09 09 42 4e 45 09 09 50 | 69 74 63 68 57 69 6e 64 |..BNE..P|itchWind|
|00004730| 6f 77 09 09 09 09 09 3b | 20 79 65 73 0d 40 34 37 |ow.....;| yes.@47|
|00004740| 35 0d 09 09 0d 09 09 41 | 44 44 51 2e 57 09 23 31 |5......A|DDQ.W.#1|
|00004750| 2c 44 34 09 09 09 09 09 | 09 3b 0d 09 09 42 52 41 |,D4.....|.;...BRA|
|00004760| 09 09 40 32 30 30 09 09 | 09 09 09 09 3b 0d 0d 40 |..@200..|....;..@|
|00004770| 35 30 32 0d 09 09 53 55 | 42 51 2e 4c 09 23 32 2c |502...SU|BQ.L.#2,|
|00004780| 53 50 09 09 09 09 09 09 | 3b 20 72 65 73 75 6c 74 |SP......|; result|
|00004790| 0d 09 09 4d 4f 56 45 2e | 57 09 23 24 32 61 2c 2d |...MOVE.|W.#$2a,-|
|000047a0| 28 53 50 29 09 09 09 09 | 09 3b 20 65 76 65 6e 74 |(SP)....|.; event|
|000047b0| 4d 61 73 6b 0d 09 09 50 | 45 41 2e 4c 09 65 76 74 |Mask...P|EA.L.evt|
|000047c0| 52 65 63 64 28 41 36 29 | 09 09 09 09 09 3b 20 56 |Recd(A6)|.....; V|
|000047d0| 41 52 20 74 68 65 45 76 | 65 6e 74 0d 09 09 5f 47 |AR theEv|ent..._G|
|000047e0| 65 74 4e 65 78 74 45 76 | 65 6e 74 09 09 09 09 09 |etNextEv|ent.....|
|000047f0| 09 3b 0d 09 09 54 53 54 | 2e 42 09 28 53 50 29 2b |.;...TST|.B.(SP)+|
|00004800| 09 09 09 09 09 09 3b 20 | 61 6e 79 20 65 76 65 6e |......; |any even|
|00004810| 74 20 3f 0d 09 09 42 45 | 51 09 09 40 35 30 32 09 |t ?...BE|Q..@502.|
|00004820| 09 09 09 09 09 3b 20 79 | 65 73 0d 50 69 74 63 68 |.....; y|es.Pitch|
|00004830| 57 69 6e 64 6f 77 0d 09 | 09 4d 4f 56 45 2e 4c 09 |Window..|.MOVE.L.|
|00004840| 6f 75 72 57 69 6e 64 50 | 74 72 28 41 36 29 2c 2d |ourWindP|tr(A6),-|
|00004850| 28 53 50 29 09 09 3b 0d | 09 09 5f 44 69 73 70 6f |(SP)..;.|.._Dispo|
|00004860| 73 57 69 6e 64 6f 77 09 | 09 09 09 09 09 3b 20 67 |sWindow.|.....; g|
|00004870| 65 74 20 72 69 64 20 6f | 66 20 69 74 0d 46 72 61 |et rid o|f it.Fra|
|00004880| 63 73 44 6f 6e 65 0d 09 | 09 5f 49 6e 69 74 43 75 |csDone..|._InitCu|
|00004890| 72 73 6f 72 0d 0d 09 09 | 43 4c 52 2e 4c 09 2d 28 |rsor....|CLR.L.-(|
|000048a0| 53 50 29 09 09 09 09 09 | 09 3b 20 72 65 73 75 6c |SP).....|.; resul|
|000048b0| 74 0d 09 09 4d 4f 56 45 | 2e 57 09 23 31 32 39 2c |t...MOVE|.W.#129,|
|000048c0| 2d 28 53 50 29 09 09 09 | 09 09 3b 20 64 6c 6f 67 |-(SP)...|..; dlog|
|000048d0| 20 49 44 0d 09 09 43 4c | 52 2e 4c 09 2d 28 53 50 | ID...CL|R.L.-(SP|
|000048e0| 29 09 09 09 09 09 09 3b | 20 64 53 74 6f 72 61 67 |)......;| dStorag|
|000048f0| 65 0d 09 09 4d 4f 56 45 | 2e 4c 09 23 2d 31 2c 2d |e...MOVE|.L.#-1,-|
|00004900| 28 53 50 29 09 09 09 09 | 09 3b 20 62 65 68 69 6e |(SP)....|.; behin|
|00004910| 64 0d 09 09 5f 47 65 74 | 4e 65 77 44 69 61 6c 6f |d..._Get|NewDialo|
|00004920| 67 09 09 09 09 09 09 3b | 20 73 68 6f 77 20 69 74 |g......;| show it|
|00004930| 0d 09 09 4d 4f 56 45 2e | 4c 09 28 53 50 29 2c 2d |...MOVE.|L.(SP),-|
|00004940| 28 53 50 29 09 09 09 09 | 09 3b 20 63 6f 70 79 20 |(SP)....|.; copy |
|00004950| 69 74 0d 09 09 5f 44 72 | 61 77 44 69 61 6c 6f 67 |it..._Dr|awDialog|
|00004960| 09 09 09 09 09 09 09 3b | 20 61 6e 64 20 64 72 61 |.......;| and dra|
|00004970| 77 20 69 74 0d 09 09 0d | 09 09 4d 4f 56 45 2e 4c |w it....|..MOVE.L|
|00004980| 09 23 36 30 2c 41 30 09 | 09 09 09 09 09 3b 20 6e |.#60,A0.|.....; n|
|00004990| 75 6d 74 69 63 6b 73 0d | 09 09 5f 44 65 6c 61 79 |umticks.|.._Delay|
|000049a0| 0d 09 09 0d 09 09 5f 44 | 69 73 70 6f 73 44 69 61 |......_D|isposDia|
|000049b0| 6c 6f 67 09 09 09 09 09 | 09 3b 0d 09 09 0d 09 09 |log.....|.;......|
|000049c0| 55 4e 4c 4b 09 41 36 0d | 09 09 4d 4f 56 45 4d 2e |UNLK.A6.|..MOVEM.|
|000049d0| 4c 09 28 53 50 29 2b 2c | 41 30 2d 41 36 2f 44 30 |L.(SP)+,|A0-A6/D0|
|000049e0| 2d 44 37 09 09 3b 20 72 | 65 73 74 6f 72 65 20 72 |-D7..; r|estore r|
|000049f0| 65 67 69 73 74 65 72 73 | 0d 09 09 5f 45 78 69 74 |egisters|..._Exit|
|00004a00| 54 6f 53 68 65 6c 6c 0d | 0d 47 65 74 46 69 65 6c |ToShell.|.GetFiel|
|00004a10| 64 52 74 6e 0d 09 09 4d | 4f 56 45 2e 4c 09 6f 75 |dRtn...M|OVE.L.ou|
|00004a20| 72 44 6c 6f 67 50 74 72 | 28 41 36 29 2c 2d 28 53 |rDlogPtr|(A6),-(S|
|00004a30| 50 29 09 09 3b 20 44 69 | 61 6c 6f 67 50 74 72 0d |P)..; Di|alogPtr.|
|00004a40| 09 09 4d 4f 56 45 2e 57 | 09 44 30 2c 2d 28 53 50 |..MOVE.W|.D0,-(SP|
|00004a50| 29 09 09 09 09 09 3b 20 | 69 74 65 6d 4e 6f 0d 09 |).....; |itemNo..|
|00004a60| 09 50 45 41 2e 4c 09 64 | 75 6d 6d 79 54 79 70 65 |.PEA.L.d|ummyType|
|00004a70| 28 41 36 29 09 09 09 09 | 3b 20 56 41 52 20 69 74 |(A6)....|; VAR it|
|00004a80| 65 6d 54 79 70 65 0d 09 | 09 50 45 41 2e 4c 09 69 |emType..|.PEA.L.i|
|00004a90| 74 65 6d 48 61 6e 64 6c | 65 28 41 36 29 09 09 09 |temHandl|e(A6)...|
|00004aa0| 09 3b 20 56 41 52 20 69 | 74 65 6d 0d 09 09 50 45 |.; VAR i|tem...PE|
|00004ab0| 41 2e 4c 09 64 75 6d 6d | 79 52 65 63 74 28 41 36 |A.L.dumm|yRect(A6|
|00004ac0| 29 09 09 09 09 3b 20 56 | 41 52 20 69 74 65 6d 52 |)....; V|AR itemR|
|00004ad0| 65 63 74 0d 09 09 5f 47 | 65 74 44 49 74 65 6d 09 |ect..._G|etDItem.|
|00004ae0| 09 09 09 09 09 09 3b 0d | 09 09 0d 09 09 4d 4f 56 |......;.|.....MOV|
|00004af0| 45 2e 4c 09 69 74 65 6d | 48 61 6e 64 6c 65 28 41 |E.L.item|Handle(A|
|00004b00| 36 29 2c 2d 28 53 50 29 | 09 09 3b 20 69 74 65 6d |6),-(SP)|..; item|
|00004b10| 0d 09 09 50 45 41 2e 4c | 09 74 65 6d 70 42 69 67 |...PEA.L|.tempBig|
|00004b20| 28 41 36 29 09 09 09 09 | 09 3b 20 56 41 52 20 74 |(A6)....|.; VAR t|
|00004b30| 65 78 74 0d 09 09 5f 47 | 65 74 49 54 65 78 74 09 |ext..._G|etIText.|
|00004b40| 09 09 09 09 09 09 3b 0d | 09 09 0d 09 09 52 54 53 |......;.|.....RTS|
|00004b50| 09 09 09 09 09 09 09 09 | 09 3b 0d 09 09 0d 43 6f |........|.;....Co|
|00004b60| 6e 76 65 72 74 46 69 65 | 6c 64 52 74 6e 0d 09 09 |nvertFie|ldRtn...|
|00004b70| 43 4d 50 2e 42 09 23 31 | 30 2c 74 65 6d 70 42 69 |CMP.B.#1|0,tempBi|
|00004b80| 67 28 41 36 29 09 09 09 | 09 3b 0d 09 09 42 47 54 |g(A6)...|.;...BGT|
|00004b90| 09 09 40 38 35 30 09 09 | 09 09 09 09 3b 0d 09 09 |..@850..|....;...|
|00004ba0| 43 4c 52 2e 4c 09 44 37 | 09 09 09 09 09 09 09 3b |CLR.L.D7|.......;|
|00004bb0| 20 63 6c 65 61 72 20 73 | 69 67 6e 20 72 65 67 0d | clear s|ign reg.|
|00004bc0| 09 09 0d 09 09 4c 45 41 | 2e 4c 09 74 65 6d 70 42 |.....LEA|.L.tempB|
|00004bd0| 69 67 28 41 36 29 2c 41 | 30 09 09 09 09 3b 0d 09 |ig(A6),A|0....;..|
|00004be0| 09 43 4c 52 2e 4c 09 44 | 30 09 09 09 09 09 09 09 |.CLR.L.D|0.......|
|00004bf0| 3b 0d 09 09 4d 4f 56 45 | 2e 4c 09 23 2d 31 2c 44 |;...MOVE|.L.#-1,D|
|00004c00| 31 09 09 09 09 09 09 3b | 0d 09 09 43 4c 52 2e 4c |1......;|...CLR.L|
|00004c10| 09 44 32 09 09 09 09 09 | 09 09 3b 0d 09 09 4d 4f |.D2.....|..;...MO|
|00004c20| 56 45 2e 42 09 28 41 30 | 29 2b 2c 44 32 09 09 09 |VE.B.(A0|)+,D2...|
|00004c30| 09 09 3b 20 67 65 74 20 | 73 74 72 69 6e 67 20 6c |..; get |string l|
|00004c40| 65 6e 67 74 68 0d 09 09 | 43 4c 52 2e 4c 09 44 33 |ength...|CLR.L.D3|
|00004c50| 09 09 09 09 09 09 09 3b | 0d 09 09 0d 09 09 43 4d |.......;|......CM|
|00004c60| 50 49 2e 42 09 23 27 2d | 27 2c 28 41 30 29 09 09 |PI.B.#'-|',(A0)..|
|00004c70| 09 09 09 3b 20 64 6f 20 | 77 65 20 73 74 61 72 74 |...; do |we start|
|00004c80| 20 77 69 74 68 20 61 20 | 6e 65 67 20 3f 0d 09 09 | with a |neg ?...|
|00004c90| 42 4e 45 2e 53 09 40 31 | 30 30 09 09 09 09 09 09 |BNE.S.@1|00......|
|00004ca0| 3b 20 6e 6f 0d 09 09 4d | 4f 56 45 2e 4c 09 23 24 |; no...M|OVE.L.#$|
|00004cb0| 38 30 30 30 30 30 30 30 | 2c 44 37 09 09 09 09 3b |80000000|,D7....;|
|00004cc0| 20 6d 61 73 6b 20 66 6f | 72 20 6c 61 74 65 72 20 | mask fo|r later |
|00004cd0| 6f 72 27 69 6e 67 0d 09 | 09 41 44 44 51 2e 4c 09 |or'ing..|.ADDQ.L.|
|00004ce0| 23 31 2c 41 30 09 09 09 | 09 09 09 3b 0d 09 09 53 |#1,A0...|...;...S|
|00004cf0| 55 42 51 2e 4c 09 23 31 | 2c 44 32 09 09 09 09 09 |UBQ.L.#1|,D2.....|
|00004d00| 09 3b 0d 40 31 30 30 0d | 09 09 43 4d 50 49 2e 42 |.;.@100.|..CMPI.B|
|00004d10| 09 23 27 2e 27 2c 28 41 | 30 29 09 09 09 09 09 3b |.#'.',(A|0).....;|
|00004d20| 20 73 65 70 65 72 61 74 | 6f 72 20 3f 0d 09 09 42 | seperat|or ?...B|
|00004d30| 45 51 09 09 40 31 39 30 | 09 09 09 09 09 09 3b 20 |EQ..@190|......; |
|00004d40| 79 65 73 0d 09 09 43 4d | 50 49 2e 42 09 23 24 33 |yes...CM|PI.B.#$3|
|00004d50| 30 2c 28 41 30 29 09 09 | 09 09 09 3b 20 63 68 65 |0,(A0)..|...; che|
|00004d60| 63 6b 20 6e 75 6d 73 0d | 09 09 42 4c 54 09 09 40 |ck nums.|..BLT..@|
|00004d70| 38 35 30 09 09 09 09 09 | 09 3b 20 62 61 64 0d 09 |850.....|.; bad..|
|00004d80| 09 43 4d 50 49 2e 42 09 | 23 24 33 39 2c 28 41 30 |.CMPI.B.|#$39,(A0|
|00004d90| 29 09 09 09 09 09 3b 20 | 63 68 65 63 6b 20 6e 75 |).....; |check nu|
|00004da0| 6d 73 0d 09 09 42 47 54 | 09 09 40 38 35 30 09 09 |ms...BGT|..@850..|
|00004db0| 09 09 09 09 3b 0d 09 09 | 4d 4f 56 45 2e 42 09 28 |....;...|MOVE.B.(|
|00004dc0| 41 30 29 2b 2c 44 33 09 | 09 09 09 09 3b 0d 09 09 |A0)+,D3.|....;...|
|00004dd0| 41 4e 44 49 2e 4c 09 23 | 31 35 2c 44 33 09 09 09 |ANDI.L.#|15,D3...|
|00004de0| 09 09 09 3b 0d 09 09 4c | 53 4c 2e 4c 09 23 34 2c |...;...L|SL.L.#4,|
|00004df0| 44 30 09 09 09 09 09 09 | 3b 20 6d 61 6b 65 20 72 |D0......|; make r|
|00004e00| 6f 6f 6d 0d 09 09 4f 52 | 2e 4c 09 44 33 2c 44 30 |oom...OR|.L.D3,D0|
|00004e10| 09 09 09 09 09 09 3b 20 | 63 6f 70 79 20 6f 76 65 |......; |copy ove|
|00004e20| 72 0d 09 09 53 55 42 51 | 2e 4c 09 23 31 2c 44 32 |r...SUBQ|.L.#1,D2|
|00004e30| 09 09 09 09 09 09 3b 0d | 09 09 42 4e 45 2e 53 09 |......;.|..BNE.S.|
|00004e40| 40 31 30 30 09 09 09 09 | 09 09 3b 20 6c 6f 6f 70 |@100....|..; loop|
|00004e50| 20 69 66 20 6d 6f 72 65 | 0d 09 09 42 52 41 09 09 | if more|...BRA..|
|00004e60| 40 33 30 30 09 09 09 09 | 09 09 3b 0d 09 09 0d 40 |@300....|..;....@|
|00004e70| 31 39 30 0d 09 09 41 44 | 44 51 2e 4c 09 23 31 2c |190...AD|DQ.L.#1,|
|00004e80| 41 30 09 09 09 09 09 09 | 3b 0d 09 09 53 55 42 51 |A0......|;...SUBQ|
|00004e90| 2e 4c 09 23 31 2c 44 32 | 09 09 09 09 09 09 3b 0d |.L.#1,D2|......;.|
|00004ea0| 09 09 42 45 51 09 09 40 | 33 30 30 09 09 09 09 09 |..BEQ..@|300.....|
|00004eb0| 09 3b 0d 09 09 0d 40 32 | 30 30 0d 09 09 43 4d 50 |.;....@2|00...CMP|
|00004ec0| 49 2e 42 09 23 24 33 30 | 2c 28 41 30 29 09 09 09 |I.B.#$30|,(A0)...|
|00004ed0| 09 09 3b 20 63 68 65 63 | 6b 20 6e 75 6d 73 0d 09 |..; chec|k nums..|
|00004ee0| 09 42 4c 54 09 09 40 38 | 35 30 09 09 09 09 09 09 |.BLT..@8|50......|
|00004ef0| 3b 20 62 61 64 0d 09 09 | 43 4d 50 49 2e 42 09 23 |; bad...|CMPI.B.#|
|00004f00| 24 33 39 2c 28 41 30 29 | 09 09 09 09 09 3b 20 63 |$39,(A0)|.....; c|
|00004f10| 68 65 63 6b 20 6e 75 6d | 73 0d 09 09 42 47 54 09 |heck num|s...BGT.|
|00004f20| 09 40 38 35 30 09 09 09 | 09 09 09 3b 0d 09 09 4d |.@850...|...;...M|
|00004f30| 4f 56 45 2e 42 09 28 41 | 30 29 2b 2c 44 33 09 09 |OVE.B.(A|0)+,D3..|
|00004f40| 09 09 09 3b 0d 09 09 41 | 4e 44 49 2e 4c 09 23 31 |...;...A|NDI.L.#1|
|00004f50| 35 2c 44 33 09 09 09 09 | 09 09 3b 0d 09 09 4c 53 |5,D3....|..;...LS|
|00004f60| 4c 2e 4c 09 23 34 2c 44 | 31 09 09 09 09 09 09 3b |L.L.#4,D|1......;|
|00004f70| 20 6d 61 6b 65 20 72 6f | 6f 6d 0d 09 09 4f 52 2e | make ro|om...OR.|
|00004f80| 4c 09 44 33 2c 44 31 09 | 09 09 09 09 09 3b 20 63 |L.D3,D1.|.....; c|
|00004f90| 6f 70 79 20 6f 76 65 72 | 0d 09 09 53 55 42 51 2e |opy over|...SUBQ.|
|00004fa0| 4c 09 23 31 2c 44 32 09 | 09 09 09 09 09 3b 0d 09 |L.#1,D2.|.....;..|
|00004fb0| 09 42 4e 45 2e 53 09 40 | 32 30 30 09 09 09 09 09 |.BNE.S.@|200.....|
|00004fc0| 09 3b 20 6c 6f 6f 70 20 | 69 66 20 6d 6f 72 65 0d |.; loop |if more.|
|00004fd0| 0d 40 33 30 30 0d 09 09 | 4d 4f 56 45 2e 4c 09 44 |.@300...|MOVE.L.D|
|00004fe0| 31 2c 44 33 09 09 09 09 | 09 09 3b 20 63 6f 70 79 |1,D3....|..; copy|
|00004ff0| 20 69 74 0d 09 09 41 4e | 44 49 2e 4c 09 23 24 46 | it...AN|DI.L.#$F|
|00005000| 30 30 30 30 30 30 30 2c | 44 33 09 09 09 09 3b 20 |0000000,|D3....; |
|00005010| 63 68 65 63 6b 20 75 70 | 70 65 72 20 6e 69 62 62 |check up|per nibb|
|00005020| 6c 65 0d 09 09 43 4d 50 | 49 2e 4c 09 23 24 46 30 |le...CMP|I.L.#$F0|
|00005030| 30 30 30 30 30 30 2c 44 | 33 09 09 09 09 3b 20 69 |000000,D|3....; i|
|00005040| 73 20 69 74 20 75 6e 75 | 73 65 64 20 3f 0d 09 09 |s it unu|sed ?...|
|00005050| 42 4e 45 2e 53 09 40 34 | 30 30 09 09 09 09 09 09 |BNE.S.@4|00......|
|00005060| 3b 20 79 65 73 0d 09 09 | 4c 53 4c 2e 4c 09 23 34 |; yes...|LSL.L.#4|
|00005070| 2c 44 31 09 09 09 09 09 | 09 3b 20 75 70 20 69 74 |,D1.....|.; up it|
|00005080| 20 61 20 64 69 67 69 74 | 0d 09 09 42 52 41 2e 53 | a digit|...BRA.S|
|00005090| 09 40 33 30 30 09 09 09 | 09 09 09 3b 0d 09 09 0d |.@300...|...;....|
|000050a0| 40 34 30 30 0d 09 09 4d | 4f 56 45 2e 4c 09 23 24 |@400...M|OVE.L.#$|
|000050b0| 30 30 30 38 30 30 30 30 | 2c 70 61 63 6b 65 64 44 |00080000|,packedD|
|000050c0| 61 74 61 28 41 36 29 09 | 3b 20 73 65 74 20 73 63 |ata(A6).|; set sc|
|000050d0| 61 6c 69 6e 67 20 66 61 | 63 74 6f 72 0d 09 09 4f |aling fa|ctor...O|
|000050e0| 52 2e 4c 09 44 37 2c 70 | 61 63 6b 65 64 44 61 74 |R.L.D7,p|ackedDat|
|000050f0| 61 28 41 36 29 09 09 09 | 3b 20 73 65 74 20 73 69 |a(A6)...|; set si|
|00005100| 67 6e 20 62 69 74 0d 09 | 09 4d 4f 56 45 2e 4c 09 |gn bit..|.MOVE.L.|
|00005110| 44 30 2c 70 61 63 6b 65 | 64 44 61 74 61 2b 34 28 |D0,packe|dData+4(|
|00005120| 41 36 29 09 09 09 3b 0d | 09 09 4d 4f 56 45 2e 4c |A6)...;.|..MOVE.L|
|00005130| 09 44 31 2c 70 61 63 6b | 65 64 44 61 74 61 2b 38 |.D1,pack|edData+8|
|00005140| 28 41 36 29 09 09 09 3b | 0d 09 09 46 4d 4f 56 45 |(A6)...;|...FMOVE|
|00005150| 2e 50 09 70 61 63 6b 65 | 64 44 61 74 61 28 41 36 |.P.packe|dData(A6|
|00005160| 29 2c 46 50 30 09 09 09 | 3b 0d 09 09 43 4c 52 2e |),FP0...|;...CLR.|
|00005170| 4c 09 44 32 09 09 09 09 | 09 09 09 3b 0d 09 09 52 |L.D2....|...;...R|
|00005180| 54 53 09 09 09 09 09 09 | 09 09 09 3b 0d 40 38 35 |TS......|...;.@85|
|00005190| 30 0d 09 09 4d 4f 56 45 | 51 2e 4c 09 23 2d 31 2c |0...MOVE|Q.L.#-1,|
|000051a0| 44 32 09 09 09 09 09 09 | 3b 0d 09 09 52 54 53 09 |D2......|;...RTS.|
|000051b0| 09 09 09 09 09 09 09 09 | 3b 0d 09 09 0d 09 09 0d |........|;.......|
|000051c0| 09 09 0d 09 09 0d 78 73 | 65 65 64 68 09 44 43 2e |......xs|eedh.DC.|
|000051d0| 58 09 22 30 2e 33 32 22 | 0d 78 73 65 65 64 76 09 |X."0.32"|.xseedv.|
|000051e0| 44 43 2e 58 09 22 30 2e | 30 34 33 22 0d 3b 73 65 |DC.X."0.|043".;se|
|000051f0| 65 64 68 09 44 43 2e 58 | 09 22 30 2e 33 33 36 22 |edh.DC.X|."0.336"|
|00005200| 0d 3b 73 65 65 64 76 09 | 44 43 2e 58 09 22 30 2e |.;seedv.|DC.X."0.|
|00005210| 30 34 33 22 0d 72 65 61 | 6c 32 09 44 43 2e 58 09 |043".rea|l2.DC.X.|
|00005220| 22 31 2e 30 22 0d 72 65 | 61 6c 6e 32 09 44 43 2e |"1.0".re|aln2.DC.|
|00005230| 58 09 22 2d 31 2e 30 22 | 0d 73 43 6f 6e 73 09 44 |X."-1.0"|.sCons.D|
|00005240| 43 2e 58 09 22 35 30 2e | 30 22 0d 3b 62 52 65 63 |C.X."50.|0".;bRec|
|00005250| 74 09 44 43 2e 57 09 35 | 30 2c 36 37 35 2c 33 39 |t.DC.W.5|0,675,39|
|00005260| 32 2c 31 31 38 37 0d 3b | 62 52 65 63 74 09 44 43 |2,1187.;|bRect.DC|
|00005270| 2e 57 09 34 30 2c 36 34 | 36 2c 34 37 35 2c 31 32 |.W.40,64|6,475,12|
|00005280| 37 34 0d 62 52 65 63 74 | 09 44 43 2e 57 09 34 30 |74.bRect|.DC.W.40|
|00005290| 2c 36 2c 34 37 35 2c 36 | 33 34 0d 72 65 73 09 09 |,6,475,6|34.res..|
|000052a0| 44 43 2e 57 09 31 0d 3b | 6c 69 6d 69 74 09 44 43 |DC.W.1.;|limit.DC|
|000052b0| 2e 57 09 32 35 36 0d 6e | 6f 6c 6f 63 6b 09 44 43 |.W.256.n|olock.DC|
|000052c0| 2e 57 09 31 0d 0d 09 09 | 53 54 52 49 4e 47 09 50 |.W.1....|STRING.P|
|000052d0| 41 53 43 41 4c 0d 77 54 | 69 74 6c 65 09 44 43 2e |ASCAL.wT|itle.DC.|
|000052e0| 42 09 27 4a 75 6c 69 61 | 20 53 65 74 73 20 76 20 |B.'Julia| Sets v |
|000052f0| 35 2e 31 62 30 20 2d 20 | 62 79 20 52 61 79 20 53 |5.1b0 - |by Ray S|
|00005300| 61 6e 64 65 72 73 2c 20 | 47 72 65 65 6e 20 47 72 |anders, |Green Gr|
|00005310| 61 73 73 20 53 6f 66 74 | 77 61 72 65 27 0d 62 79 |ass Soft|ware'.by|
|00005320| 41 09 09 44 43 2e 42 09 | 27 57 72 69 74 74 65 6e |A..DC.B.|'Written|
|00005330| 20 62 79 20 52 61 79 20 | 53 61 6e 64 65 72 73 2c | by Ray |Sanders,|
|00005340| 20 47 72 65 65 6e 20 47 | 72 61 73 73 20 53 6f 66 | Green G|rass Sof|
|00005350| 74 77 61 72 65 20 49 6e | 63 2e 27 0d 62 79 42 09 |tware In|c.'.byB.|
|00005360| 09 44 43 2e 42 09 27 50 | 2e 4f 2e 42 6f 78 20 35 |.DC.B.'P|.O.Box 5|
|00005370| 37 30 2c 20 44 75 6e 65 | 64 69 6e 2c 20 46 6c 6f |70, Dune|din, Flo|
|00005380| 72 69 64 61 20 33 34 36 | 39 37 2d 30 35 37 30 27 |rida 346|97-0570'|
|00005390| 0d 62 79 43 09 09 44 43 | 2e 42 09 27 28 38 31 33 |.byC..DC|.B.'(813|
|000053a0| 29 20 37 39 36 2d 32 32 | 37 32 27 0d 62 6c 61 6e |) 796-22|72'.blan|
|000053b0| 6b 09 44 43 2e 42 09 27 | 20 27 0d 09 09 09 45 4e |k.DC.B.'| '....EN|
|000053c0| 44 57 49 54 48 0d 09 09 | 09 45 4e 44 4d 41 49 4e |DWITH...|.ENDMAIN|
|000053d0| 0d 09 09 09 45 4e 44 0d | 0d 00 00 00 00 00 00 00 |....END.|........|
|000053e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000053f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005400| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00005410| d1 c0 03 e9 cd 8e 24 b9 | 65 7d bb 40 07 f0 9a 36 |......$.|e}.@...6|
|00005420| 70 9d 4b 18 36 00 04 3f | ff 98 d3 1e ae 2a fa 5d |p.K.6..?|.....*.]|
|00005430| 0a 4a 75 6c 69 61 53 65 | 74 2e 61 2d 02 00 00 00 |.JuliaSe|t.a-....|
|00005440| 54 45 58 54 4d 50 53 20 | 01 00 00 80 00 00 00 00 |TEXTMPS |........|
|00005450| 00 00 54 45 58 54 4d 50 | 53 20 01 00 00 80 00 00 |..TEXTMP|S ......|
|00005460| 00 00 35 9e 00 00 00 00 | 00 00 00 00 00 00 00 00 |..5.....|........|
|00005470| 00 00 9d 8e 82 af 00 00 | 53 59 00 00 01 7e 38 dd |........|SY...~8.|
|00005480| f5 d9 45 00 00 00 00 00 | 00 00 00 00 00 00 00 07 |..E.....|........|
|00005490| 04 60 0a 00 00 50 41 43 | 4b 00 06 00 82 41 fa ff |.`...PAC|K....A..|
|000054a0| f2 a1 28 12 10 4a 78 02 | 8e 6b 04 a0 69 12 00 a0 |..(..Jx.|.k..i...|
|000054b0| 29 20 5f 30 1f 2f 08 41 | fa 00 08 d0 f0 00 00 4e |) _0./.A|.......N|
|000054c0| d0 00 d4 02 3c 02 ec 03 | 1c 03 9c 04 28 04 1e 02 |....<...|....(...|
|000054d0| 14 02 cc 04 10 41 fa ff | ba a1 28 a0 2a 4e 75 50 |.....A..|..(.*NuP|
|000054e0| c1 06 40 27 10 60 08 4a | 01 67 04 06 40 00 64 48 |..@'.`.J|.g..@.dH|
|000054f0| c0 48 e7 40 80 41 ee ff | e4 42 67 a9 ee 4c df 01 |.H.@.A..|.Bg..L..|
|00005500| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 31 01 ff |...H..Mo|naco.1..|
|00005510| 00 31 02 50 00 51 00 1b | 00 51 00 23 00 51 01 ff |.1.P.Q..|.Q.#.Q..|
|00005520| 00 51 02 50 01 5f 00 06 | 00 04 00 29 00 03 01 cc |.Q.P._..|...)....|
|00005530| 02 75 00 29 00 03 01 cc | 02 75 9e 82 e1 1e 00 00 |.u.)....|.u......|
|00005540| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 01 00 |........|........|
|00005550| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 02 59 a0 |...L...L|...2..Y.|
|00005560| 04 0c 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.......2|..MPSR..|
|00005570| 00 0a 03 ed ff ff 00 00 | 00 00 00 03 5c 60 00 00 |........|....\`..|
+--------+-------------------------+-------------------------+--------+--------+